DIRECTORY
IO USING [STREAM],
Rope USING [ROPE];

NPGSCommandUtil: CEDAR DEFINITIONS = {

PairList: TYPE = LIST OF RECORD[key, val: Rope.ROPE];
Switches: TYPE = PACKED ARRAY CHAR ['a..'z] OF BOOL;

Echo: PROC [
d: IO.STREAM,
operator: Rope.ROPE,
argList, resultList: PairList,
switches: Rope.ROPE];
GetSwitches: PROC [switches: Rope.ROPE, default: Switches] RETURNS[Switches];
GetNthPair: PROC [list: PairList, n: CARDINAL, delete: BOOL_FALSE]
RETURNS [key,value: Rope.ROPE];
GetNth: PROC [list: PairList, n: CARDINAL, delete: BOOL_FALSE]
RETURNS [Rope.ROPE] = INLINE {
RETURN [GetNthPair[list, n, delete].value]};
KeyValue: PROC [key: Rope.ROPE, list: PairList, delete: BOOL_FALSE]
RETURNS [Rope.ROPE];
ListLength: PROC [list: PairList] RETURNS [CARDINAL];
ParseCommand: PROC [s: IO.STREAM]
RETURNS [operator: Rope.ROPE, argList, resultList: PairList, switches: Rope.ROPE];
SetExtension: PROC [root, defaultExt: Rope.ROPE] RETURNS [name: Rope.ROPE];
GetRootName: PROC[name: Rope.ROPE] RETURNS [root: Rope.ROPE];
SkipNonBlank: PROC [s: IO.STREAM, n: CARDINAL_1];

Failed: ERROR;

}.

   D  
NPGSCommandUtil.Mesa
Copyright c 1985 by Xerox Corporation.  All rights reserved.
Satterthwaite, December 10, 1982 10:32 am
Russ Atkinson, 19-Dec-80 13:22:44
Maxwell, August 19, 1983 8:39 am
Paul Rovner, October 4, 1983 4:59 pm
Russ Atkinson (RRA) March 6, 1985 10:03:29 pm PST
JKF February 6, 1989 12:11:49 pm PST

 Э╩E  ХNewlineDelimiter
Щ codeЪЬЩKЪЬ
╧mЬ1Щ<KЪЬ)Щ)KЪЬ!Щ!KЩ KЩ$KЩ1KЩ$ЧKЩ Ъ╧k	Ш	KЪЮЬЮЬЮЬШKЪЬЮЬЮЬШKШ ЧKЪ╧nЬЮЬШ&Ш KЪЬ
ЮЬЮЬЮЬЮЬЮ	ЬШ5KЪЬ
ЮЬЮЬЮЬЮЬ
ЮЬЮЬШ4KШ ЪЯЬЮЬШKЪЬЮЬЮЬШKЪЬ
Ю	ЬШKШKЪЬ
Ю	ЬШЧKЪЯЬЮЬЮ	ЬЮЬШMЪ
Я
ЬЮЬЮЬ
ЮЬЮЬШBKЪЮЬЮ	ЬШЧЪ
ЯЬЮЬЮЬ
ЮЬЮЬШ>KЪЮЬЮ	ЬЮЬШKЪЮЬ&Ш,ЧЪ
ЯЬЮЬЮ	ЬЮЬЮЬШCKЪЮЬЮ	ЬШЧKЪЯ
ЬЮЬЮЬЮЬШ5ЪЯЬЮЬЮЬЮЬШ!KЪЮЬЮ	Ь+Ю	ЬШRЧKЪ
ЯЬЮЬЮ	ЬЮЬЮ	ЬШKKЪ
ЯЬЮЬЮ	ЬЮЬЮ	ЬШ=KЪЯЬЮЬЮ	ЬЮЬШ1KШ KЪЬЮЬШKШ KШKШ ЧЧ ЕЧ    <  ┼  