********************************************************************

      *  NOTE: This file is generated automatically from the event
      *        definition file Match.evt.
      ********************************************************************


INTERFACE MatchAlgClass;

<*NOWARN*> IMPORT Match, Algorithm, VBT, AlgorithmClass;

<* PRAGMA LL *>

TYPE
  EventDataRec = RECORD
    stopAtInit: BOOLEAN := TRUE;
    waitAtInit: CARDINAL := 1;
    ctOfInit: CARDINAL := 0;
    stopAtSetState: BOOLEAN := TRUE;
    waitAtSetState: CARDINAL := 1;
    ctOfSetState: CARDINAL := 0;
  END;

  T <: Public;
  Public = Algorithm.T OBJECT
      eventDataRec: EventDataRec;

      METHODS
        feSelected ( key: INTEGER; READONLY cd: VBT.MouseRec);    <* LL = VBT.mu *>
      END;

REVEAL
  Algorithm.T <: AlgorithmClass.T;

END MatchAlgClass.