<> <> <> <<>> DIRECTORY ViewerAbort USING [], ViewerClasses USING [Viewer]; ViewerAbortStubImpl: CEDAR PROGRAM EXPORTS ViewerAbort ~ BEGIN Viewer: TYPE ~ ViewerClasses.Viewer; CallWithAbortEnabled: PUBLIC PROC [viewer: Viewer, action: PROC] ~ { action[]; }; CallWithAbortAndCallback: PUBLIC PROC [viewer: Viewer, action: PROC, callback: PROC [REF], data: REF] ~ { action[]; }; <<>> END.