ColorEditOps.mesa
Copyright © 1986 by Xerox Corporation. All rights reserved.
Eric Nickell, January 7, 1986 8:38:53 am PST
DIRECTORY
AdjustColorStd USING [TRC],
IO USING [STREAM],
Rope USING [ROPE],
SampleArrays USING [SampleArray],
SampleMapOps USING [SampleMap],
SelectRegions USING [Rectangle];
~
BEGIN
Rectangle: TYPE ~ SelectRegions.Rectangle;
ROPE: TYPE ~ Rope.ROPE;
SampleArray: TYPE ~ SampleArrays.SampleArray;
SampleMap: TYPE ~ SampleMapOps.SampleMap;
TRC: TYPE ~ AdjustColorStd.TRC;
LogApply:
PROC [trc:
REF
TRC, sm: SampleMap, extent: Rectangle]
RETURNS [rope:
ROPE];
Compresses the information used for an Apply into a rope.
ApplyLog:
PROC [changeLog:
ROPE, sa: SampleArray];
Takes a ROPE which is the concatentation of ROPEs created by LogApply, and applies them to sa.
SaveExtentOfMask:
PROC [mask: SampleMap, extent: Rectangle, fileName:
ROPE];
Saves the contents of mask within the extent to the named file.
ReadExtentOfMask:
PROC [mask: SampleMap, fileName:
ROPE]
RETURNS [extent: Rectangle];
Reads the contents of the file into mask, and returns the extent which has bits in it.
SaveExtentOfMaskToStream:
PROC [stream:
IO.
STREAM, mask: SampleMap, extent: Rectangle];
Same as SaveExtentOfMask, except to a stream.
ReadExtentOfMaskFromStream:
PROC [stream:
IO.
STREAM, mask: SampleMap]
RETURNS [extent: Rectangle];
Same as ReadExtentOfMask, except from a stream.