Bend.mesa

Greene, September 10, 1986 6:29:29 pm PDT

Bend: CEDAR DEFINITIONS =

BEGIN

NextHookProc: TYPE = PROC [] RETURNS [down: BOOL, break: INT, quit: BOOLEAN ← FALSE];

OutputSegmentProc: TYPE = PROC [incrementX, incrementY: INT];

BendToHooks: PROC [lineX, lineY: INT, NextHook: NextHookProc, OutputSegment:OutputSegmentProc];

DiagonalToHooks: PROC [lineX, lineY: INT, NextHook: NextHookProc, OutputSegment:OutputSegmentProc];

END.