CDDefaultProcs.mesa (part of ChipNDale)
Copyright © 1985 by Xerox Corporation. All rights reserved.
by Ch. Jacobi, May 22, 1985 3:35:49 pm PDT
last edited by Ch. Jacobi, September 19, 1985 2:47:05 am PDT
DIRECTORY
CD, Rope;
CDDefaultProcs: CEDAR DEFINITIONS =
BEGIN OPEN CD;
class implementors default procedure
--ObjectClass
QuickDrawMe: PROC [inst: Instance, pos: Position, orient: Orientation, pr: REF DrawInformation];
DrawMe: PROC [inst: Instance, pos: Position, orient: Orientation, pr: REF DrawInformation];
ShowMeSelected: PROC [inst: Instance, pos: Position, orient: Orientation, pr: REF DrawInformation];
ShowMeSelectedWithExpand: PROC [inst: Instance, pos: Position, orient: Orientation, pr: REF DrawInformation];
HitInside: PROC [ob: Object, hitRect: Rect] RETURNS [BOOL];
InterestRect: PROC [ob: Object] RETURNS [Rect];
InterestRectWithExpand: PROC [ob: Object] RETURNS [Rect];
OldInsideRect: PROC [ob: Object] RETURNS [Rect];
InternalWrite: PROC [me: Object];
InternalRead: PROC [] RETURNS [Object];
Describe: PROC [me: Object] RETURNS [Rope.ROPE];
DescribeInstance: PROC [ap: Instance] RETURNS [Rope.ROPE];
Origin: PROC [ob: Object] RETURNS [Position];
--DrawProcs
DrawChild: PROC [inst: Instance, pos: Position, orient: Orientation, pr: REF DrawInformation];
DrawRect: PROC [r: Rect, l: Layer, pr: DrawRef];
DrawOutLine: PROC [r: Rect, pr: DrawRef];
DrawComment: PROC [r: Rect, comment: Rope.ROPE, pr: DrawRef];
DrawContext: PROC [pr: DrawRef, proc: DrawContextLayerProc, ob: Object, pos: Position, orient: Orientation, layer: Layer];
IgnoreGround: PROC [pr: DrawRef, pushedOut: BOOL];
IgnorePriority: PROC [pr: DrawRef];
END.