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. ²ExtraAIS.Mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Last Edited by: Spreitzer, July 21, 1984 4:11:22 pm PDT Rick Beach, May 17, 1985 12:47:03 pm PDT Κ³– "cedar" style˜code™ Kšœ Οmœ1™