<> <> <> <> <> <> DIRECTORY Imager USING [Context], ImagerFont USING [Font], PressReader USING [Handle], Rope USING [ROPE], ViewerClasses USING [ViewerRec, Viewer]; ShowPress: CEDAR DEFINITIONS ~ BEGIN Handle: TYPE ~ REF PressFileRec; PressFileRec: TYPE ~ RECORD [ pressFile: PressReader.Handle, fontTable: ARRAY [0..256) OF FontRec, lastPart: INT _ 0 ]; FontRec: TYPE ~ RECORD [ imagerFont: ImagerFont.Font _ NIL, family: Rope.ROPE _ NIL, face: [0..256) _ 0, size: REAL _ 0, rotation: REAL _ 0 ]; Open: PROC [fileName: Rope.ROPE] RETURNS [show: Handle _ NIL]; DrawPressPage: PROC [ context: Imager.Context, show: Handle, pageNumber: INT, tinyPaint: BOOL _ FALSE ]; <> <> <<>> Close: PROC [show: Handle]; CreateShowViewer: PROC [info: ViewerClasses.ViewerRec] RETURNS [v: ViewerClasses.Viewer]; ShowPressError: ERROR [code: ATOM]; END. <> <<>> <> <> <<>> <> <> <<>>