#include "src/rplexternals.h"
#include "motif.h"

declareExternalFunction(XtAppExitMainLoop)
	HEADER
		declareHelpString("Send exit signal to XtAppMainLoop");
		numberOfArguments(0);
	FUNCTION
		if (initializationDone eq true) then
			setTrue(exitMainLoop);
		orElse
			executionError("Application not initialized");
			returnOnError();
		endIf
	END
endExternalFunction

// vim: ts=4