
DIRECTORY MakeDo, Rope, SymTab;

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];

EnumerateWithSuffix: PROC [SymTab.Ref, ROPE, PROC [ROPE]];

FlushCache: PROC;

}.
    Þ  
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
Returns NIL if it doesn't exist
 Ê<  –(cedarcode) style•NewlineDelimiter
™ code™Kšœ
Ïeœ7™BK™<K™"—K˜ KšÏk	œ˜K˜ šÏnœžœžœžœ˜0K˜ š	œžœžœžœžœ˜AKšœ˜Kšœ˜K˜Kšœ!˜!KšœÏc(˜AKšœ 0˜GKšœ I˜_Kšœ˜—K˜ Kšœžœ4˜DKšœžœ+˜;K˜ šŸœžœ3žœ˜YK™—K˜ Kš
Ÿœžœžœžœžœ˜:K˜ KšŸ
œžœ˜K˜ K˜—— …—      2  