DIRECTORY
Rope,
SiroccoPrivate,
AbstractTypesDef,
WartDef,
HashTable;

ParserPrivateDef: CEDAR DEFINITIONS = 
BEGIN
OPEN Rope, SiroccoPrivate, AbstractTypesDef, WartDef, HashTable;
card: PROC[INT] RETURNS[CARD];

int: PROC[CARD] RETURNS[INT];

nat: PROC[INT] RETURNS[NAT];

GetCardFromDecimal: PROC[numberDNode] RETURNS[CARD];

GetCardFromOctal: PROC[numberONode] RETURNS[CARD];

GetCardFromHex: PROC[numberHNode] RETURNS[CARD];

RopeTokenToROPE: PROC[RopeNode] RETURNS[ROPE];

CopyRope: PROC[ROPE] RETURNS[ROPE];

CopyTables: PROC[TABLES] RETURNS[TABLES];

CopyAll: PROC[ROPE, FunctionList, TABLES] RETURNS[ROPE, FunctionList, TABLES];

CreateCanonicalKey: PROC[identifierNode, numberDNode, numberDNode] RETURNS[ROPE];

CreateKey: PROC[identifierNode] RETURNS[ROPE];

CopyFunctionList: PROC[FunctionList] RETURNS[FunctionList];

CreateTables: PROC RETURNS[TABLES];

DiskToTable: PROC[TABLES, identifierNode, numberDNode, numberDNode] RETURNS[TABLES];

FetchFromGlobalTable: PROC[TABLES, ROPE] RETURNS[Table];

CheckCanonicalType: PROC[ROPE, ROPE, TABLES] RETURNS[TABLES];

CheckResultsForSourceAndSink: PROC[CComponent] RETURNS[INT];

CompareTypes: PROC[CType, CType, TABLES] RETURNS[INT];

GetCType: PROC[identifierNode, CComponent, TABLES] RETURNS[CType, ROPE];

GetLengthOfCComponentList: PROC[CComponent, INT] RETURNS[INT];

SeeIfArrOrSeq: PROC[CType, INT, TABLES] RETURNS[CType, ROPE];

AddOne: PROC[INT] RETURNS[INT];

CopyCComponent: PROC[CComponent] RETURNS[CComponent];

GetCTypeFirstChild: PROC[CType] RETURNS[CComponent];

MkCComponent: PROC[ROPE, INT, ROPE, CComponent] RETURNS[CComponent];

MkCType: PROC[Generic, INT, CComponent] RETURNS[CType];

MkNILCComponent: PROC RETURNS[CComponent];

ValueToConstant: PROC[Value] RETURNS[ConstantNode];

ValueToRope: PROC[Value] RETURNS[ROPE];

ValueToRopeConstant: PROC[Value, ROPE] RETURNS[ROPE];

Copy: PROC[ROPE, CType, ConstantNode, TABLES] RETURNS[ROPE, CType, ConstantNode, TABLES];

FetchFromTypeTable: PROC[TABLES, ROPE] RETURNS[CType];

GetObjectName: PROC[ROPE, TABLES] RETURNS[ROPE];

MakeUpFunctionName: PROC RETURNS[ROPE];

Remove: PROC[identifierNode, TABLES] RETURNS[TABLES];

SendError: PROC[ROPE] RETURNS[CARD];

IntoCondensedFunctionTable: PROC[ROPE, ROPE, TABLES] RETURNS[TABLES];

IntoUnresolvedConstantTable: PROC[TABLES, ROPE, TypeNode, ConstantNode] RETURNS[TABLES];

IntoUnresolvedTypeTable: PROC[TABLES, ROPE, TypeNode] RETURNS[TABLES];

ClearWorkTable: PROC[TABLES] RETURNS[TABLES];

EnterNamesIntoWorkTable: PROC[CType, TABLES] RETURNS[TABLES];

FillWorkTable: PROC[CType, TABLES] RETURNS[TABLES];

AddLocalConstantToRope: PROC[identifierNode, ROPE, ROPE, FunctionList, ROPE, TABLES] RETURNS[ROPE, FunctionList, TABLES];

CanonicaliseLocalReferenceType: PROC[identifierNode, TABLES] RETURNS[ROPE, CType, TABLES];

GetConstantType: PROC[identifierNode, TABLES] RETURNS[ROPE, CType, ConstantNode, TABLES];

TryToCoerceNumber: PROC[CType, CARD] RETURNS[INT];

Array: PROC[ROPE, TABLES] RETURNS[BOOLEAN];

CheckIfEmpty: PROC[TABLES] RETURNS[TABLES];

CompareClass: PROC[CType, Generic] RETURNS[CComponent];

InsureErrorType: PROC[identifierNode, TABLES] RETURNS[TABLES];

IsEnumerationConstant: PROC[CType, identifierNode] RETURNS[INT];

NotEnumeration: PROC[CType] RETURNS[BOOLEAN];

SeeIfDuplicated: PROC[TABLES, identifierNode, CARD] RETURNS[TABLES];

SeeIfInt: PROC[CType] RETURNS[BOOLEAN];

AddFunctionList: PROC[Value, FunctionList] RETURNS[FunctionList];

AddFunctionToTable: PROC[Value, FunctionList, TABLES] RETURNS[TABLES];

ConsFunctionList: PROC[FunctionList, ROPE] RETURNS[FunctionList];

GetTypeOfComponent: PROC[identifierNode, ROPE, TABLES] RETURNS[ROPE];

TypeOfSequence: PROC[ROPE, TABLES] RETURNS[ROPE];

END..