Return to XtAppExitMainLoop.rplc CVS log

Up to [local] / rpl / modules / motif

Annotation of rpl/modules/motif/XtAppExitMainLoop.rplc, revision 1.1

1.1     ! bertrand    1: #include "src/rplexternals.h"
        !             2: #include "motif.h"
        !             3: 
        !             4: declareExternalFunction(XtAppExitMainLoop)
        !             5:    HEADER
        !             6:        declareHelpString("Send exit signal to XtAppMainLoop");
        !             7:        numberOfArguments(0);
        !             8:    FUNCTION
        !             9:        if (initializationDone eq true) then
        !            10:            setTrue(exitMainLoop);
        !            11:        orElse
        !            12:            executionError("Application not initialized");
        !            13:            returnOnError();
        !            14:        endIf
        !            15:    END
        !            16: endExternalFunction