File:  [local] / rpl / modules / motif / XtAppExitMainLoop.rplc
Revision 1.2: download - view: text, annotated - select for diffs - revision graph
Thu Jul 6 10:18:04 2017 UTC (6 years, 10 months ago) by bertrand
Branches: MAIN
CVS tags: rpl-4_1_35, rpl-4_1_34, rpl-4_1_33, rpl-4_1_32, rpl-4_1_31, rpl-4_1_30, rpl-4_1_29, rpl-4_1_28, rpl-4_1_27, HEAD
Patches pour motif.rplso.

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

CVSweb interface <joel.bertrand@systella.fr>