DEFINITION MODULE TalkNarrator; (*$ LargeVars:=FALSE LongAlign:=FALSE *) FROM Narrator IMPORT NewNarrator,NewNarratorPtr; TYPE BoolProc=PROCEDURE():BOOLEAN; VAR talking:BOOLEAN; PROCEDURE Translate():BOOLEAN; PROCEDURE DoTalk(testAbort:BoolProc); END TalkNarrator.