
<<PString.Mesa>>
<<Copyright (c) Xerox Corporation, 1982.  All rights reserved.>>
<<Last Modified On  20-Nov-81 16:34:07 by JHM>>
<<Schmidt August 22, 1982 1:41 pm>>
<<lasted edited by Satterthwaite, April 18, 1986 4:42:14 pm PST>>


DIRECTORY
Rope: TYPE USING [ROPE];

PString: CEDAR DEFINITIONS = {

ROPE: TYPE = Rope.ROPE;
Stream: TYPE = PRIVATE RECORD[place: INT, node: ROPE];

ConvertStream: PROC[Stream] RETURNS[ROPE];
CopyStream: PROC[Stream] RETURNS[Stream];
Empty: PROC[ROPE] RETURNS [BOOL];
EmptyS: PROC[Stream] RETURNS [BOOL];
Item: PROC[Stream] RETURNS[CHAR, Stream];
MakeInt: PROC[ROPE] RETURNS [INT];
MakeNUM: PROC[INT] RETURNS [ROPE];
NewStream: PROC[ROPE] RETURNS[Stream];
StringToFile: PROC[ROPE] RETURNS[ROPE];
Sub: PROC[ROPE,INT] RETURNS[CHAR];
SubStream: PROC[Stream,INT] RETURNS[CHAR];
SubString: PROC[ROPE,INT,INT] RETURNS [ROPE];
SubStringStream: PROC[Stream,INT,INT] RETURNS [ROPE];

}.





