#include <stdlib.h>
#include "mathlink.h"
typedef struct foo_
{
int member1;
} foo;
/* destroy a foo object retrieved from a link */
void c(MLINK lp)
{
foo *fobj;
fobj = MLUserData(lp, (MLUserFunction *)0);
if(fobj == (foo *)0) return;
free(foo);
}
/* allocate a foo object and store it in a link */
void f(MLINK lp)
{
foo *fobj;
fobj = (foo *)malloc(sizeof(foo));
if(fobj == (foo *)0)
{ /* error allocating space for foo object */ }
MLSetUserData(lp, (void *)fobj, c);
}