Anthony Minessale 8027cb8ee8 return of mod_perl
git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@8198 d0543943-73ff-0310-b7d9-9358b9ac24b2
2008-04-25 22:12:01 +00:00

19 lines
393 B
C

#include <EXTERN.h>
#include <perl.h>
EXTERN_C void xs_init (pTHX);
EXTERN_C void boot_DynaLoader (pTHX_ CV* cv);
EXTERN_C void boot_freeswitch (pTHX_ CV* cv);
EXTERN_C void
xs_init(pTHX)
{
char *file = __FILE__;
dXSUB_SYS;
/* DynaLoader is a special case */
newXS("DynaLoader::boot_DynaLoader", boot_DynaLoader, file);
newXS("freeswitchc::boot_freeswitch", boot_freeswitch, file);
}