********************************************************************
* NOTE: This file is generated automatically from the event * definition file StringSearch.evt. ********************************************************************INTERFACEStringSearchAlgClass ; <*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.