<> <> <> 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.