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

void
rplCallback(Widget x_objet, XtPointer argument, XtPointer call)
{
	declareObject(list);

	list = argument;
	// argument = { rpl_arguments callback }

	pthread_mutex_lock(&callbackMutex);

	evaluation((*((struct_liste_chainee *) (*list).objet)).donnee,
			(*(*((struct_liste_chainee *) (*list).objet)).suivant).donnee, 'E');

	pthread_mutex_unlock(&callbackMutex);
	return;
}

// vim: ts=4