CDDefaultProcs.mesa (part of ChipNDale)
Copyright © 1985, 1986 by Xerox Corporation. All rights reserved.
by Ch. Jacobi, May 22, 1985 3:35:49 pm PDT
last edited by Ch. Jacobi, March 14, 1986 11:10:36 am PST
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];
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, l: Layer, 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.