<> <> <> <> <<>> DIRECTORY Rope USING [ROPE]; CDRopeViewer: CEDAR DEFINITIONS = BEGIN <> SaveProc: TYPE = PROC[contents, formatting: Rope.ROPE, clientData: REF, discard: BOOL]; Edit: PROC [contents, caption, formatting: Rope.ROPE _ NIL, save: SaveProc _ NIL, clientData: REF_NIL, fork: BOOL _ TRUE, saveOnDiscard: BOOL _ FALSE ]; <<--if contents#NIL tiogaContents is ignored>> END.