#include <misc.h>
#include "tlmplib.h"

static _F_sort *priv_c;		// One sort at a time...

static int cmp_obj (const ARRAY_OBJ *o1, const ARRAY_OBJ *o2)
{
	return priv_c->cmp(o1,o2);
}

void sort (_F_sort &c, ARRAY &a)
{
	priv_c = &c;
	a.sort (cmp_obj);
}