********************************************************************
* NOTE: This file is generated automatically from the event * definition file UnionFind.evt. ********************************************************************<* PRAGMA LL *> INTERFACEUnionFindViewClass ; <*NOWARN*> IMPORT View, Thread; TYPE T <: Public; Public = View.T OBJECT METHODS <*LL = {} *> oeSetup ( ) RAISES {Thread.Alerted}; oeNewSet ( nm: TEXT) RAISES {Thread.Alerted}; oeFinishedSets ( numSets: INTEGER; usesRanks: BOOLEAN) RAISES {Thread.Alerted}; oeStartFind ( id: INTEGER) RAISES {Thread.Alerted}; oeEndFind ( id: INTEGER) RAISES {Thread.Alerted}; oeStartDoFind ( id: INTEGER) RAISES {Thread.Alerted}; oeStepUp ( child, parent: INTEGER) RAISES {Thread.Alerted}; oeFound ( id: INTEGER) RAISES {Thread.Alerted}; oeStepDown ( child, parent: INTEGER) RAISES {Thread.Alerted}; oeChangeParent ( child, parent, root: INTEGER) RAISES {Thread.Alerted}; oeEndDoFind ( id: INTEGER) RAISES {Thread.Alerted}; oeStartUnion ( id1, id2: INTEGER; bothRoots: BOOLEAN) RAISES {Thread.Alerted}; oeFoundFirst ( id1: INTEGER) RAISES {Thread.Alerted}; oeCompareRanks ( id1, id2: INTEGER) RAISES {Thread.Alerted}; oeUnite ( child, parent, pRank: INTEGER) RAISES {Thread.Alerted}; oeEndUnion ( ) RAISES {Thread.Alerted}; <*LL = VBT.mu *> END; END UnionFindViewClass.