DIRECTORY Rope USING [ROPE], IO USING [Value]; ISMessage: CEDAR DEFINITIONS ~ BEGIN Close: PROC; OpenTempFile: PROC; CloseTempFile: PROC;ReopenTempFile: PROC; GetTempFileChar: PROC RETURNS [c: CHAR]; GetIndex: PROC RETURNS [INT]; PutF: PROC [format: Rope.ROPE _ NIL, v1, v2, v3, v4, v5: IO.Value _ [null[]]]; PutBlock: PROC [block: REF READONLY TEXT, startIndex: NAT _ 0, count: NAT _ NAT.LAST]; OpenTiogaOutput: PROC [fileName: Rope.ROPE]; WriteTiogaOutputFile: PROC; WriteTiogaRope: PROC [rope: Rope.ROPE, lookChars: Rope.ROPE, comment: BOOL _ FALSE]; TiogaDeltaLevel: PROC [d: INT]; WriteTiogaProp: PROC [prop: ATOM, value: Rope.ROPE]; WriteTiogaFormat: PROC [format: ATOM]; END. ΨISMessage.mesa Copyright c 1985 by XebOx Corporation. All rights reserved. MKaplan, September 13, 1985 2:50:06 pm PDT IO stuff. The TempFile procs are no longer used. Writes out the current node with the deltaLevel, attaching properties previously set with WriteTiogaProp, and the format. Adds a property to the property list attached to the node on the next call to TiogaDeltaLevel. Sets the format of the current node (written at next call to TiogaDeltaLevel). Κ›˜™Icodešœ Οmœ1™