DIRECTORY BasicTime, OrderedSymbolTableRef, Rope; TermCaps: CEDAR DEFINITIONS = { GMT: TYPE = BasicTime.GMT; nullGMT: GMT = BasicTime.nullGMT; ROPE: TYPE = Rope.ROPE; RopeList: TYPE = LIST OF ROPE; SymbolTable: TYPE = OrderedSymbolTableRef.Table; TermCap: TYPE = REF TermCapRep; TermCapRep: TYPE = RECORD [ fileID: FileID, contents: SymbolTable, complaints: ROPE _ NIL]; FileID: TYPE = RECORD [gName: ROPE, create: GMT]; Term: TYPE = REF TermRep; TermRep: TYPE = RECORD [ names: RopeList _ NIL, bestName: ROPE _ NIL, caps: SymbolTable, default: Term _ NIL]; Alias: TYPE = REF AliasRep; AliasRep: TYPE = RECORD [name: ROPE, val: Term]; Cap: TYPE = REF CapRep; CapRep: TYPE = RECORD [ name: ROPE, val: Val]; Val: TYPE = REF ANY --actually UNION [{cancel}, RefBool, RefInt, String]--; cancel: Val; RefBool: TYPE = REF BOOL; RefInt: TYPE = REF INT; String: TYPE = REF StringRep; StringRep: TYPE = RECORD [ pad: REAL _ 0, proportional: BOOL _ FALSE, str: ROPE]; GetTermCap: PROC [fileName: ROPE, wDir: ROPE _ NIL] RETURNS [tc: TermCap]; GetTerm: PROC [tc: TermCap, name: ROPE] RETURNS [term: Term]; GetCap: PROC [term: Term, name: ROPE, default: Val _ NIL] RETURNS [val: Val]; EnumerateCaps: PROC [term: Term, consume: PROC [cap: Cap] RETURNS [stop: BOOL]]; EnumerateTerms: PROC [tc: TermCap, consume: PROC [term: Term] RETURNS [stop: BOOL]]; }. fTermCaps.Mesa Last Edited by: Spreitzer, March 13, 1985 11:19:34 pm PST Also present in names. ΚΕ– "cedar" style˜Icode™ J™9K˜KšΟk œ(˜1K˜šΠbxœœ ˜K˜Kšœ˜K˜Kšœœ œ˜Kšœ œ˜!Kšœœœ˜Kš œ œœœœ˜Kšœ œ˜0K˜Kšœ œœ ˜šœ œœ˜K˜K˜Kšœ œœ˜—K˜Kš œœœ œ œ˜1K˜Kšœœœ ˜šœ œœ˜Kšœœ˜šœ œœ˜K™—K˜Kšœœ˜—K˜Kšœœœ ˜Kšœ œœœ ˜0K˜Kšœœœ˜šœœœ˜Kšœœ˜ K˜ —K˜Kš œœœœΟc6œ˜KKšœ ˜ Kšœ œœœ˜Kšœœœœ˜Kšœœœ ˜šœ œœ˜Kšœœ˜Kšœœœ˜Kšœœ˜ —K˜Kš Οn œœ œœœœ˜JK˜Kš œœœœ˜=K˜Kš  œœœœœ ˜MK˜Kš   œœœ œœ˜PK˜Kš  œœœœœ˜TK˜K˜——…—P{