#include "xlshlib.h" static LVAL fred() { FIXTYPE x = getfixnum(xlgafixnum()); FIXTYPE y = getfixnum(xlgafixnum()); xllastarg(); return cvfixnum(x + y); } static FUNDEF myfuns[] = { { "FOO:FRED", SUBR, fred }, { NULL, 0, NULL } }; static FIXCONSTDEF myfixconsts[] = { { "FOO::FROG", 7 }, { NULL, 0 } }; static FLOCONSTDEF myfloconsts[] = { { "FOO::FROG-F", 5.0 }, { NULL, 0 } }; static STRCONSTDEF mystrconsts[] = { { "FOO::FROG-S", "Hello" }, { NULL, 0 } }; static ULONGCONSTDEF myulongconsts[] = { { "FOO::ULONG-MAX", ULONG_MAX }, { NULL, 0 } }; static xlshlib_modinfo_t myinfo = { XLSHLIB_VERSION_INFO(0,1,0,1), myfuns, myfixconsts, myfloconsts, mystrconsts, myulongconsts }; xlshlib_modinfo_t *mymodule__init() { return &myinfo; }