--File ParserUtilityDefs.mesa
--March 3, 1980 12:18 AM


DIRECTORY

ParserTypeDefs: FROM "ParserTypeDefs" USING [Path, Point];

ParserUtilityDefs: DEFINITIONS =

BEGIN

InitUtilities: PROCEDURE RETURNS [BOOLEAN];
FinishUtilities: PROCEDURE RETURNS [BOOLEAN];

PossibleError: TYPE =
{NumberTooBig, MissingUnsigned, MissingSigned, MissingSemiColon,
NullPath, BadTransCommand, BadUserCommand,
BadCommand, InternalError, BadDefineCommand, MissingLayer,
BadComment, IllegalAxis, NestDef, NoDS, NestEnd, NestDD};

RecoverFromError: ERROR [errorCode: PossibleError];

Blank: PROCEDURE;
Sep: PROCEDURE;
Semi: PROCEDURE RETURNS [BOOLEAN];
GetPath: PROCEDURE [ParserTypeDefs.Path];
Unsigned: PROCEDURE RETURNS [CARDINAL];
UnsignedLong: PROCEDURE RETURNS [LONG CARDINAL];
Signed: PROCEDURE RETURNS [INTEGER];
SignedLong: PROCEDURE RETURNS [LONG INTEGER];
GetPoint: PROCEDURE RETURNS [ParserTypeDefs.Point];

END.