mentor/derived/WheelerAlgClass.i3


 Copyright (C) 1995, Digital Equipment Corporation.       
 All rights reserved.                                     
 See the file COPYRIGHT for a full description.           
                                                          
 Last modified on Thu Feb  9 08:47:37 PST 1995 by kalsow  
 Last modified on Wed Feb 17 16:44:58 PST 1993 by johnh   
      modified on Tue Jun  9 00:35:07 1992 by mhb         

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

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


INTERFACE WheelerAlgClass;

<*NOWARN*> IMPORT TextConv, Algorithm, MiscFmt, AlgorithmClass;

<* PRAGMA LL *>

TYPE
  EventDataRec = RECORD
    stopAtStartPermute: BOOLEAN := TRUE;
    waitAtStartPermute: CARDINAL := 1;
    ctOfStartPermute: CARDINAL := 0;
    stopAtNextRotation: BOOLEAN := TRUE;
    waitAtNextRotation: CARDINAL := 1;
    ctOfNextRotation: CARDINAL := 0;
    stopAtRotationsSorted: BOOLEAN := TRUE;
    waitAtRotationsSorted: CARDINAL := 1;
    ctOfRotationsSorted: CARDINAL := 0;
    stopAtPermuteDone: BOOLEAN := TRUE;
    waitAtPermuteDone: CARDINAL := 1;
    ctOfPermuteDone: CARDINAL := 0;
    stopAtStartEncode: BOOLEAN := TRUE;
    waitAtStartEncode: CARDINAL := 1;
    ctOfStartEncode: CARDINAL := 0;
    stopAtEncodeNextChar: BOOLEAN := TRUE;
    waitAtEncodeNextChar: CARDINAL := 1;
    ctOfEncodeNextChar: CARDINAL := 0;
    stopAtEncodeDistinctCount: BOOLEAN := TRUE;
    waitAtEncodeDistinctCount: CARDINAL := 1;
    ctOfEncodeDistinctCount: CARDINAL := 0;
    stopAtEncodeFoundCode: BOOLEAN := TRUE;
    waitAtEncodeFoundCode: CARDINAL := 1;
    ctOfEncodeFoundCode: CARDINAL := 0;
    stopAtEncodeDone: BOOLEAN := TRUE;
    waitAtEncodeDone: CARDINAL := 1;
    ctOfEncodeDone: CARDINAL := 0;
    stopAtInitDecode: BOOLEAN := TRUE;
    waitAtInitDecode: CARDINAL := 1;
    ctOfInitDecode: CARDINAL := 0;
    stopAtStartDecode: BOOLEAN := TRUE;
    waitAtStartDecode: CARDINAL := 1;
    ctOfStartDecode: CARDINAL := 0;
    stopAtDecodeNextCode: BOOLEAN := TRUE;
    waitAtDecodeNextCode: CARDINAL := 1;
    ctOfDecodeNextCode: CARDINAL := 0;
    stopAtDecodeDistinctCount: BOOLEAN := TRUE;
    waitAtDecodeDistinctCount: CARDINAL := 1;
    ctOfDecodeDistinctCount: CARDINAL := 0;
    stopAtDecodeFoundChar: BOOLEAN := TRUE;
    waitAtDecodeFoundChar: CARDINAL := 1;
    ctOfDecodeFoundChar: CARDINAL := 0;
    stopAtDecodeDone: BOOLEAN := TRUE;
    waitAtDecodeDone: CARDINAL := 1;
    ctOfDecodeDone: CARDINAL := 0;
    stopAtStartReconstruct: BOOLEAN := TRUE;
    waitAtStartReconstruct: CARDINAL := 1;
    ctOfStartReconstruct: CARDINAL := 0;
    stopAtFirstChars: BOOLEAN := TRUE;
    waitAtFirstChars: CARDINAL := 1;
    ctOfFirstChars: CARDINAL := 0;
    stopAtConsiderChar: BOOLEAN := TRUE;
    waitAtConsiderChar: CARDINAL := 1;
    ctOfConsiderChar: CARDINAL := 0;
    stopAtEqualChars: BOOLEAN := TRUE;
    waitAtEqualChars: CARDINAL := 1;
    ctOfEqualChars: CARDINAL := 0;
    stopAtFinishCharRun: BOOLEAN := TRUE;
    waitAtFinishCharRun: CARDINAL := 1;
    ctOfFinishCharRun: CARDINAL := 0;
    stopAtStartResult: BOOLEAN := TRUE;
    waitAtStartResult: CARDINAL := 1;
    ctOfStartResult: CARDINAL := 0;
    stopAtResultNextChar: BOOLEAN := TRUE;
    waitAtResultNextChar: CARDINAL := 1;
    ctOfResultNextChar: CARDINAL := 0;
    stopAtEndResult: BOOLEAN := TRUE;
    waitAtEndResult: CARDINAL := 1;
    ctOfEndResult: CARDINAL := 0;
    stopAtReveal: BOOLEAN := TRUE;
    waitAtReveal: CARDINAL := 1;
    ctOfReveal: CARDINAL := 0;
  END;

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

      METHODS
      END;

REVEAL
  Algorithm.T <: AlgorithmClass.T;

END WheelerAlgClass.