********************************************************************
* NOTE: This file is generated automatically from the event
* definition file Bresenham.evt.
********************************************************************
<* PRAGMA LL *>
INTERFACE BresenhamIE ;
<*NOWARN*> IMPORT Algorithm, View, Thread;
call the following to generate an event:
PROCEDURE Setup (
initiator: Algorithm.T;
width, height: INTEGER; show: BOOLEAN
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE NewLine (
initiator: Algorithm.T;
x0, y0, x1, y1: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE ErrorInit (
initiator: Algorithm.T;
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE ShowPixel (
initiator: Algorithm.T;
x, y, p1, p2: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE FindError (
initiator: Algorithm.T;
p: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE ChangeError (
initiator: Algorithm.T;
p: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE CompareError (
initiator: Algorithm.T;
p: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE ShowNextPixel (
initiator: Algorithm.T;
p: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE Move (
initiator: Algorithm.T;
p: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
END BresenhamIE.