********************************************************************
* NOTE: This file is generated automatically from the event
* definition file StringSearch.evt.
********************************************************************
INTERFACE StringSearchAlgClass ;
<*NOWARN*> IMPORT Algorithm, AlgorithmClass;
<* PRAGMA LL *>
TYPE
EventDataRec = RECORD
stopAtSetup: BOOLEAN := TRUE;
waitAtSetup: CARDINAL := 1;
ctOfSetup: CARDINAL := 0;
stopAtProbe: BOOLEAN := TRUE;
waitAtProbe: CARDINAL := 1;
ctOfProbe: CARDINAL := 0;
stopAtResult: BOOLEAN := TRUE;
waitAtResult: CARDINAL := 1;
ctOfResult: CARDINAL := 0;
stopAtPartialMatch: BOOLEAN := TRUE;
waitAtPartialMatch: CARDINAL := 1;
ctOfPartialMatch: CARDINAL := 0;
stopAtPartialMatchClear: BOOLEAN := TRUE;
waitAtPartialMatchClear: CARDINAL := 1;
ctOfPartialMatchClear: CARDINAL := 0;
stopAtCompleteMatch: BOOLEAN := TRUE;
waitAtCompleteMatch: CARDINAL := 1;
ctOfCompleteMatch: CARDINAL := 0;
stopAtSlideTo: BOOLEAN := TRUE;
waitAtSlideTo: CARDINAL := 1;
ctOfSlideTo: CARDINAL := 0;
stopAtKMPSetup: BOOLEAN := TRUE;
waitAtKMPSetup: CARDINAL := 1;
ctOfKMPSetup: CARDINAL := 0;
stopAtAddEdge: BOOLEAN := TRUE;
waitAtAddEdge: CARDINAL := 1;
ctOfAddEdge: CARDINAL := 0;
END;
T <: Public;
Public = Algorithm.T OBJECT
eventDataRec: EventDataRec;
METHODS
END;
REVEAL
Algorithm.T <: AlgorithmClass.T;
END StringSearchAlgClass.