ViewerAbortStubImpl.mesa
Copyright Ó 1989, 1992 by Xerox Corporation. All rights reserved.
Doug Wyatt, September 22, 1989 4:16:19 pm PDT
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.