ImagerPixelArrayPrivate.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Doug Wyatt, May 19, 1985 2:50:07 pm PDT
DIRECTORY
Atom USING [PropList],
ImagerPixelArray USING [PixelArray, Sample, UnsafeSamples],
PrincOps USING [BitAddress, DstFunc, SrcFunc];
ImagerPixelArrayPrivate: CEDAR DEFINITIONS
~ BEGIN OPEN ImagerPixelArray;
PixelArrayImpl: TYPE ~ REF PixelArrayImplRep;
PixelArrayImplRep: TYPE ~ RECORD []; -- not currently used
PixelArrayClass: TYPE ~ REF PixelArrayClassRep;
PixelArrayClassRep:
TYPE ~
RECORD[
type: ATOM,
MaxSampleValue: PROC [pa: PixelArray, i: NAT] RETURNS [Sample],
UnsafeGetSamples: UNSAFE PROC [pa: PixelArray, i: NAT ← 0, s, f: INT,
samples: UnsafeSamples, count: NAT],
UnsafeGetBits: UNSAFE PROC [pa: PixelArray, i: NAT ← 0, s, f: INT,
dst: PrincOps.BitAddress, dstBpl: INTEGER, width, height: CARDINAL,
srcFunc: PrincOps.SrcFunc ← null, dstFunc: PrincOps.DstFunc ← null],
propList: Atom.PropList ← NIL
];
END.