Copyright (C) 1994, Digital Equipment Corp.
********************************************************************
* NOTE: This file is generated automatically from the event
* definition file gefevent.evt.
********************************************************************
<* PRAGMA LL *>
INTERFACE gefeventIE;
<* NOWARN *> IMPORT RefList;
<* NOWARN *> IMPORT SLispClass;
<*NOWARN*> IMPORT Algorithm, Thread, View;
call the following to generate an event:
PROCEDURE Init (
initiator: Algorithm.T;
files: RefList.T
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE Event (
initiator: Algorithm.T;
name: TEXT; args: RefList.T
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE Pause (
initiator: Algorithm.T;
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE Feedback (
initiator: View.T;
name: TEXT; args: RefList.T
) RAISES {Thread.Alerted};
<* LL = VBT.mu *>
PROCEDURE Update (
initiator: Algorithm.T;
name: TEXT; args: RefList.T
) RAISES {Thread.Alerted};
<* LL = VBT.mu *>
END gefeventIE.