GGCircleCache.mesa
Copyright © 1986 by Xerox Corporation. All rights reserved.
Created by: Ken Pier, August 14, 1986
Last Edited By: Ken Pier, August 15, 1986 11:18:11 am PDT
DIRECTORY
FunctionCache, GGBasicTypes, Imager, ImagerPixelMap;
GGCircleCache: CEDAR DEFINITIONS = BEGIN
Point: TYPE = GGBasicTypes.Point;
Cache: TYPE = FunctionCache.Cache;
Context: TYPE = Imager.Context;
CachedCircle: TYPE = REF CachedCircleRep;
CachedCircleRep: TYPE = ImagerPixelMap.PixelMap;
Create: PROC [] RETURNS [Cache];
Insert: PROC [x: Cache, radius: REAL];
Lookup:
PROC [x: Cache, radius:
REAL]
RETURNS [CachedCircle];
Returns NIL if lookup fails
Remove: PROC [x: Cache, radius: REAL];
RemoveAll: PROC [x: Cache];
DrawCachedCircle: PROC [context: Context, point: Point, circle: CachedCircle];
END.