#include "mathlink.h"
/* send a function using tokens and argument counts to a link */
void f(MLINK lp)
{
if(! MLPutNext(lp, MLTKFUNC))
{ /* unable to put the function type to lp */ }
if(! MLPutArgCount(lp, 2))
{ /* unable to put the number of arguments to lp */ }
if(! MLPutSymbol(lp, "Plus"))
{ /* unable to put the symbol to lp */ }
if(! MLPutInteger32(lp, 2))
{ /* unable to put the integer to lp */ }
if(! MLPutInteger32(lp, 3))
{ /* unable to put the integer to lp */ }
if(! MLFlush(lp))
{ /* unable to flush any buffered outgoing data to lp */ }
}