<<>> <> <> <> <> <> DIRECTORY IO USING [STREAM], Rope USING [ROPE]; CinderInterface: CEDAR DEFINITIONS = BEGIN DoCind: PUBLIC PROC [in: IO.STREAM, out: IO.STREAM, clientData: REF] RETURNS [result: REF ¬ NIL, msg: Rope.ROPE ¬ NIL]; <> <> <> <<$CinderServer => run as a server (no FileViewerOps usage)>> <<$Cinder: normal compilation requested>> <> <> <> <<$Success: if files were cinded successfully>> <<$Failure: if an error or warning was detected for any cind>> <> <<"A": cind aborted by user action>> <<"F": errors detected>> <<"W": warnings detected>> <> END.