rpl/modules/motif/motif.rplc - diff

Return to motif.rplc CVS log

Up to [local] / rpl / modules / motif

version 1.4, 2017/07/10 07:25:24	version 1.6, 2017/07/17 21:35:32
Line 15 exportExternalFunctions(	Line 15 exportExternalFunctions(
XtDestroyWidget,	XtDestroyWidget,
XtPopdown,	XtPopdown,
XtPopup,	XtPopup,
XtRealizeWidget);	XtRealizeWidget,
	XtRemoveCallback);

declareSubroutine(onLoading)	declareSubroutine(onLoading)
notice(stdout, "\nMotif library V2R1 for RPL/2 (C) 2017 BERTRAND Joel\n");	notice(stdout, "\nMotif library V2R1 for RPL/2 (C) 2017 BERTRAND Joel\n");
Line 64 declareSubroutine(onLoading)	Line 65 declareSubroutine(onLoading)

createVariable(XmSTRING);	createVariable(XmSTRING);

createListObject(callbacksList);

setFalse(initializationDone);	setFalse(initializationDone);
	nullify(lCallbacks);
endSubroutine	endSubroutine

declareSubroutine(onClosing)	declareSubroutine(onClosing)
// Destruction des variables spécifiques	// Destruction des variables spécifiques
declareObject(variable);	declareObject(variable);
	declareDaisyChain(current);
	declareDaisyChain(next);

	current = lCallbacks;

	repeatWhile(not nullified(current))
	next = current;
	nextElementOfDaisyChain(next);
	variable = fetchElementFromDaisyChain(current);
	freeObject(variable);
	free(current);
	current = next;
	endWhile

freeObject(callbacksList);	nullify(lCallbacks);

#define purgeVariable(var) \	#define purgeVariable(var) \
do { \	do { \