MakeDoParsers.Mesa
Copyright Ó 1991, 1992 by Xerox Corporation. All rights reserved.
Last tweaked by Mike Spreitzer on May 8, 1990 7:32:02 am PDT
Willie-s, May 13, 1992 1:15 pm PDT
MakeDoParsers:
CEDAR
DEFINITIONS = {
OPEN MakeDo;
ParseData:
TYPE =
REF ParseDataRep; ParseDataRep:
TYPE =
RECORD [
source: Node,
stamp: Time ¬ notExistTime,
sourceType: SourceType,
resultType: ResultType ¬ Unknown,
refdModules: SymTab.Ref, --actually file names without extensions
refdFiles: SymTab.Ref, --STATIC REQUESTS from configs, all from C files
refdFileSeq: RopeList --the members of refdFiles, in reverse of the order they were encountered
];
SourceType: TYPE = {Unknown, Mesa, Config, PlainC, Scheme, Cluster};
ResultType: TYPE = {Unknown, MobAndC, MobOnly, O, SxCAndO};
GetParseData:
PROC [sourceNode: MakeDo.Node, sourceType: SourceType]
RETURNS [ParseData];
Returns NIL if it doesn't exist
EnumerateWithSuffix: PROC [SymTab.Ref, ROPE, PROC [ROPE]];
FlushCache: PROC;
}.