kenmirrors/freeswitch
1
0
Fork 0
mirror of https://github.com/signalwire/freeswitch.git synced 2025-08-13 01:26:58 +00:00
Code Issues Projects Releases Wiki Activity

add perl wrapper to scgi

Browse Source
This commit is contained in:
Anthony Minessale
2012-05-23 09:37:54 -05:00
parent a5cd951c53
commit bb3f72cb66
12 changed files with 7025 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
libs/libscgi/perl/perlxsi.c Normal file
View File

@@ -0,0 +1,16 @@
#include <EXTERN.h>
#include <perl.h>
EXTERN_C void xs_init (pTHX);
EXTERN_C void boot_DynaLoader (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);
}