Text preview for : Strings.mesa_Sep78.pdf part of xerox Strings.mesa Sep78 xerox mesa 4.0_1978 listing Mesa_4_System Strings.mesa_Sep78.pdf



Back to : Strings.mesa_Sep78.pdf | Home

Strings.mesa 2-Sep-78 18:05:56 Page 1


-- File: Strings.Mesa Edited by Sandman on May 12, 1970 3:13 PM
DIRECTORY
InlineDefs: FROM "inlinedefs" USING [8ITAND, BITOR, DIVMOD],
Mopcodes: FROM "mopcodes" USING [zKFCB, zPOP],
SDDefs: FROM "sddefs" USING [sLongDivMod],
StringDefs: FROM "stringdefs" USING [
bcplMaxLength, bcplSTRING, bcplStringHeaderSize, CharsPerWord,
StringHeaderSize, SubString];
DEFINITIONS FROM StringDefs;
Strings: PROGRAM EXPORTS StringDefs SHARES StringDefs = PUBLIC
BEGIN
WordsForString: PROCEDURE [nchars: CARDINAL] RETURNS [CARDINAL]