DIRECTORY Imager USING [Context], IO USING [STREAM]; ImagerInterpressPrivate: CEDAR DEFINITIONS ~ BEGIN Ref: TYPE ~ REF Rep; Rep: TYPE ~ RECORD[ page: INT _ 0, context: Imager.Context _ NIL, data: Data _ NIL ]; Data: TYPE ~ REF DataRep; DataRep: TYPE ~ RECORD[ stream: IO.STREAM, frame: Frame _ NIL, buffer: REF TEXT _ NIL, getTDone: BOOL _ FALSE, getTForm: NAT _ firstIPForm, savedSize: NAT _ 0 ]; firstIPForm: NAT ~ 100; endIPForm: NAT ~ 1000; Frame: TYPE ~ REF FrameRep; FrameRep: TYPE ~ RECORD [size: NAT, entries: SEQUENCE max: NAT OF REF]; END. ŽImagerInterpressPrivate.mesa Copyright c 1986 by Xerox Corporation. All rights reserved. Doug Wyatt, October 31, 1986 10:07:31 am PST ΚŸ˜codešœ™Kšœ Οmœ1™