<> <> <> <> <> <<>> DIRECTORY Imager USING [Context], IO USING [STREAM], Rope USING [ROPE]; Interpress: CEDAR DEFINITIONS ~ BEGIN <<>> ROPE: TYPE ~ Rope.ROPE; STREAM: TYPE ~ IO.STREAM; LogProc: TYPE ~ PROC [class: INT, code: ATOM, explanation: ROPE]; InstructionsRecord: TYPE; Instructions: TYPE = REF InstructionsRecord; CredentialsRecord: TYPE; Credentials: TYPE ~ REF CredentialsRecord; classMasterError: INT ~ 0; classMasterWarning: INT ~ 10; classAppearanceError: INT ~ 50; classAppearanceWarning: INT ~ 60; classComment: INT ~ 100; Master: TYPE ~ REF MasterRep; MasterRep: TYPE ~ RECORD [ pages: INT, -- number of pages in the master impl: REF MasterImplRep, -- implementation details copies: INT _ 1 -- max. copies referenced ]; MasterImplRep: TYPE; Open: PROCEDURE [fileName: ROPE, log: LogProc, credentials: Credentials _ NIL, instructionsHandle: Instructions _ NIL] RETURNS [Master]; <> <<>> FromStream: PROCEDURE [stream: STREAM, log: LogProc, credentials: Credentials _ NIL, instructionsHandle: Instructions _ NIL] RETURNS [Master]; <> <<>> DoPage: PROCEDURE [master: Master, page: INT, context: Imager.Context, log: LogProc, copy: INT _ 1]; <> <<>> Close: PROCEDURE [master: Master]; <> <<>> END.