MCrossUtilityDefs.mesa
P.Rovner July 1, 1982 5:44 pm
DIRECTORY Rope USING[ROPE];
MCrossUtilityDefs: DEFINITIONS =
BEGIN
Confirm: PROCEDURE RETURNS[BOOLEAN];
IsNumber: PROCEDURE[s: Rope.ROPE] RETURNS[BOOLEAN];
IsTerminator: PROCEDURE[ch: CHARACTER] RETURNS [BOOLEAN];
Returns TRUE if the string has only spaces, tabs and CRs
IsLineEmpty: PROCEDURE[line: Rope.ROPE] RETURNS[BOOLEAN];
Returns True if Str1 is equal to Str2
EqualString: PROCEDURE[str1,str2: Rope.ROPE] RETURNS[BOOLEAN];
Returns True if Str1 is Lexically less then Str2
StringLessThan: PROCEDURE[str1,str2: Rope.ROPE] RETURNS[BOOLEAN];
END.