<<>> <> <> <> <> <<>> DIRECTORY Imager, IO, Rope; IPtoPS: CEDAR DEFINITIONS ~ BEGIN Context: TYPE ~ Imager.Context; STREAM: TYPE ~ IO.STREAM; ROPE: TYPE ~ Rope.ROPE; PSFont: TYPE ~ RECORD [name: ROPE, type: ATOM, scale: REAL]; EncodingVectorType: TYPE ~ {isoLatin1, symbol, expert, standard}; DoWithCodeProc: TYPE ~ PROC [code: BYTE, encodingVector: EncodingVectorType] RETURNS [continue: BOOL ¬ TRUE]; Warn: SIGNAL [reason: ROPE]; Create: PROC [ stream: STREAM, nPages: INT, creator: ROPE, comment: ROPE ¬ NIL, compact: BOOL ¬ FALSE, debug: STREAM ¬ NIL] RETURNS [Context]; <> Close: PROC [context: Imager.Context]; <> <<>> DoWithCode: PROC [name: ATOM, action: DoWithCodeProc]; <> <> <<>> NInvalidChars: PROC [context: Context] RETURNS [INTEGER]; <> PSFontFromImager: PROC [imagerName: ROPE] RETURNS [psFont: PSFont]; <> END.