Return to XtAppExitMainLoop.rplc CVS log

Up to [local] / rpl / modules / motif

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

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
1.2     ! bertrand   17: 
        !            18: // vim: ts=4