File:  [local] / rpl / modules / motif / XtAppExitMainLoop.rplc
Revision 1.1: download - view: text, annotated - select for diffs - revision graph
Wed Jul 5 13:53:39 2017 UTC (6 years, 11 months ago) by bertrand
Branches: MAIN
CVS tags: HEAD
Premiers bouts de code pour la bibliothèque d'interface Xm.

    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

CVSweb interface <joel.bertrand@systella.fr>