<> <> <> <> DIRECTORY AIS; ExtraAIS: CEDAR DEFINITIONS = BEGIN OPEN AIS; VRef: TYPE ~ REF VRep; -- Window that may extend beyond the data VRep: TYPE ~ RECORD [ w: WRef _ NIL, fref: FRef _ NIL, firstScan: INTEGER _ 0, lastScan: INTEGER _ 0, firstPixel: INTEGER _ 0, lastPixel: INTEGER _ 0, cfs, cls, cfp, clp: INTEGER _ 0, --clipped bounds wordsPerLine: CARDINAL _ 0, --the number of words for one windowed scan line pixelsPerWord: CARDINAL _ 0, nextScanLine: CARDINAL _ 0, clineaddr: LONG POINTER _ NIL, emptyValue: CARDINAL _ 0 ]; OpenWindow: PROC [f: FRef, firstScan: INTEGER _ 0, lastScan: INTEGER _ LAST[INTEGER], firstPixel: INTEGER _ 0, lastPixel: INTEGER _ LAST[INTEGER], emptyValue: CARDINAL _ 0] RETURNS [v: VRef]; CloseWindow: PROC [v: VRef]; UnsafeReadLine: UNSAFE PROC [v: VRef, buffer: Buffer, line: INTEGER _ LAST[INTEGER]]; END.