#{ NESTED -- Test error types from nested scripts. procedure nested (type) int type { prompt = "Error test code: " } begin # dummy space # dummy space nest0 (type) end