rpl/modules/motif/XtCreateWidget.rplc - diff

Return to XtCreateWidget.rplc CVS log

Up to [local] / rpl / modules / motif

version 1.3, 2017/07/06 10:18:04	version 1.4, 2017/07/10 07:25:24
Line 42 declareExternalFunction(XtCreateWidget)	Line 42 declareExternalFunction(XtCreateWidget)
returnOnError(freeObject(parametersObject);	returnOnError(freeObject(parametersObject);
freeObject(parentObject));	freeObject(parentObject));

	ifIsExternal(widget, WIDGET) then
	orElse
	executionError("Type mismatch error");
	returnOnError(freeObject(parametersObject);
	freeObject(parentObject));
	endIf

pullFromStack(classObject, string);	pullFromStack(classObject, string);
returnOnError(freeObject(parametersObject);	returnOnError(freeObject(parametersObject);
freeObject(parentObject);	freeObject(parentObject);
Line 213 declareExternalFunction(XtCreateWidget)	Line 220 declareExternalFunction(XtCreateWidget)
createExternalObject(widget, WIDGET);	createExternalObject(widget, WIDGET);

target((Widget *) objectContainer(widget)) =	target((Widget *) objectContainer(widget)) =
XtCreateWidget(name, wc, (((sXtAppContext )	XtCreateWidget(name, wc, target((sXtAppContext *)
objectContainer(parentObject))).widget, args, argNum);	objectContainer(parentObject)).widget, args, argNum);
XtManageChild(target((Widget *) objectContainer(widget)));	XtManageChild(target((Widget *) objectContainer(widget)));

pushOnStack(widget);	pushOnStack(widget);