-- GenOneCasabaParserPrivate.mesa -- last edit March 28, 1985 9:09:36 am PST -- Sturgis, March 26, 1986 4:38:32 pm PST DIRECTORY IO USING[STREAM]; GenOneCasabaParserPrivate: CEDAR DEFINITIONS = BEGIN OPEN IO; <> GetErrorInfo: SIGNAL RETURNS[stream: STREAM, textPosition: INT]; KillParserGen: ERROR; END..