CinderInterface.mesa
Copyright Ó 1988, 1989, 1991 by Xerox Corporation. All rights reserved.
Russ Atkinson (RRA) March 24, 1988 3:55:27 pm PST
Andy Litman March 28, 1988 6:03:18 pm PST
JKF July 22, 1989 3:49:35 pm PDT
DoCind:
PUBLIC
PROC [in:
IO.
STREAM, out:
IO.
STREAM, clientData:
REF]
RETURNS [result:
REF ¬
NIL, msg: Rope.
ROPE ¬
NIL];
The stream in gives the command input.
The stream out receives interactive output.
The clientData is an ATOM, with the following being supported:
$CinderServer => run as a server (no FileViewerOps usage)
$Cinder: normal compilation requested
other case reserved for extensions
The result will be one of the following:
NIL: if no files were cinded
$Success: if files were cinded successfully
$Failure: if an error or warning was detected for any cind
The msg will give some information if result = $Failure. Some of the standard messages are:
"A": cind aborted by user action
"F": errors detected
"W": warnings detected
Other messages will indicate problems with file access or other problems that need lengthy explanations.