--- rpl/modules/motif/motif.rplc 2017/07/05 13:53:40 1.3 +++ rpl/modules/motif/motif.rplc 2017/07/11 16:04:53 1.5 @@ -5,10 +5,17 @@ libraryName(motif); exportExternalFunctions( + XSynchronize, + XtAddCallback, XtAppExitMainLoop, XtAppInitialize, XtAppMainLoop, - XtCreateWidget); + XtCreatePopupShell, + XtCreateWidget, + XtDestroyWidget, + XtPopdown, + XtPopup, + XtRealizeWidget); declareSubroutine(onLoading) notice(stdout, "\nMotif library V2R1 for RPL/2 (C) 2017 BERTRAND Joel\n"); @@ -56,6 +63,9 @@ declareSubroutine(onLoading) createVariable(XtGrabExclusive); createVariable(XmSTRING); + + setFalse(initializationDone); + lCallbacks = NULL; endSubroutine declareSubroutine(onClosing)