DIRECTORY Alloc USING [Handle], ConvertUnsafe USING [SubString], Literals, Symbols USING [Type]; LiteralOps: DEFINITIONS = { OPEN Literals; Initialize: PROC [Alloc.Handle]; Finalize: PROC; WordIndex: PROC [index: LitIndex] RETURNS [LTIndex] = INLINE { RETURN [NARROW[index, LitIndex.word].lti]}; StringIndex: PROC [index: LitIndex] RETURNS [STIndex] = INLINE { RETURN [NARROW[index, LitIndex.string].sti]}; CopyLiteral: PROC [LTId] RETURNS [LitIndex.word]; DescriptorValue: PROC [LTIndex] RETURNS [LitDescriptor]; FindDescriptor: PROC [LONG DESCRIPTOR FOR ARRAY OF WORD] RETURNS [LitIndex.word]; Find: PROC [WORD] RETURNS [LitIndex.word]; ForgetEntries: PROC RETURNS [currentSize: CARDINAL]; Value: PROC [LTIndex] RETURNS [WORD]; EnumerateHeapStrings: PROC [PROC [STIndex]]; EnumerateLocalStrings: PROC [STIndex, PROC [MSTIndex]]; EnumerateMasterStrings: PROC [PROC [MSTIndex]]; FindHeapString: PROC [STIndex, Symbols.Type] RETURNS [STIndex]; FindLocalString: PROC [STIndex] RETURNS [STIndex]; FindString: PROC [ConvertUnsafe.SubString] RETURNS [LitIndex.string]; MasterString: PROC [sti: STIndex] RETURNS [MSTIndex]; ResetLocalStrings: PROC RETURNS [STIndex]; StringReference: PROC [STIndex]; StringValue: PROC [STIndex] RETURNS [LONG STRING]; TextType: PROC [STIndex] RETURNS [Symbols.Type]; }. XLiteralOps.Mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Satterthwaite, February 18, 1983 9:16 am Maxwell, July 27, 1983 11:43 am Paul Rovner, September 7, 1983 5:58 pm Russ Atkinson (RRA) March 6, 1985 10:06:31 pm PST discrimination procedural interface for standard literals procedural interface for string literals Κ|˜codešœ™Kšœ Οmœ1™Kšžœžœ˜+K˜—šŸ œžœžœ žœ˜@Kšžœžœ˜-—K˜K˜Kšœ*™*K˜KšŸ œžœžœ˜1KšŸœžœ žœ˜8KšŸœžœžœžœžœžœžœžœ˜QKšŸœžœžœžœ˜*KšŸ œžœžœžœ˜4KšŸœžœ žœžœ˜%K˜K˜Kšœ(™(K˜KšŸœžœžœ ˜,KšŸœžœ žœ ˜7KšŸœžœžœ ˜/KšŸœžœžœ ˜?KšŸœžœ žœ ˜2KšŸ œžœžœ˜EKšŸ œžœžœ ˜5KšŸœžœžœ ˜*KšŸœžœ ˜ Kš Ÿ œžœ žœžœžœ˜2KšŸœžœ žœ˜0K˜˜K˜——…—"φ