********************************************************************
* NOTE: This file is generated automatically from the event
* definition file Wheeler.evt.
********************************************************************
<* PRAGMA LL *>
INTERFACE WheelerIE ;
<*NOWARN*> IMPORT TextConv, Algorithm, View, Thread, MiscFmt;
call the following to generate an event:
PROCEDURE StartPermute (
initiator: Algorithm.T;
string, alphabet: TEXT
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE NextRotation (
initiator: Algorithm.T;
i: INTEGER; string: TEXT
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE RotationsSorted (
initiator: Algorithm.T;
rotations: MiscFmt.RefTextArray; rowIndex: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE PermuteDone (
initiator: Algorithm.T;
lastchars: TEXT; rowIndex: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE StartEncode (
initiator: Algorithm.T;
alphabet: TEXT
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE EncodeNextChar (
initiator: Algorithm.T;
i: INTEGER; c: CHAR
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE EncodeDistinctCount (
initiator: Algorithm.T;
i, k, n: INTEGER; c: CHAR
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE EncodeFoundCode (
initiator: Algorithm.T;
i, k, code: INTEGER; c: CHAR
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE EncodeDone (
initiator: Algorithm.T;
alphabet: TEXT; codes: MiscFmt.RefIntArray; rowIndex: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE InitDecode (
initiator: Algorithm.T;
alphabet: TEXT; codes: MiscFmt.RefIntArray; rowIndex: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE StartDecode (
initiator: Algorithm.T;
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE DecodeNextCode (
initiator: Algorithm.T;
i: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE DecodeDistinctCount (
initiator: Algorithm.T;
i, k, n: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE DecodeFoundChar (
initiator: Algorithm.T;
i, k: INTEGER; c: CHAR
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE DecodeDone (
initiator: Algorithm.T;
lastchars: TEXT; rowIndex: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE StartReconstruct (
initiator: Algorithm.T;
lastchars: TEXT; rowIndex: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE FirstChars (
initiator: Algorithm.T;
t: TEXT
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE ConsiderChar (
initiator: Algorithm.T;
i: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE EqualChars (
initiator: Algorithm.T;
i, j: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE FinishCharRun (
initiator: Algorithm.T;
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE StartResult (
initiator: Algorithm.T;
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE ResultNextChar (
initiator: Algorithm.T;
pos, k: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE EndResult (
initiator: Algorithm.T;
) RAISES {Thread.Alerted};
<* LL = {} *>
PROCEDURE Reveal (
initiator: Algorithm.T;
i: INTEGER
) RAISES {Thread.Alerted};
<* LL = {} *>
END WheelerIE.