Ok after hours of testing I resolved most of the problems. My main focus was to implment some necessary code into C but I can't do this even with the simplest code from documentation.
Here is an example:
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
#include <stdio.h>
#include "ppport.h"
static PerlInterpreter *my_perl;
int main(int argc, char **argv, char **env) {
SV *cvrv = eval_pv("sub { print 'You will not find me cluttering any n
+amespace!' }", TRUE);
char *args[] = { NULL };
PERL_SYS_INIT3(&argc,&argv,&env);
my_perl = perl_alloc();
perl_construct(my_perl);
perl_parse(my_perl, NULL, argc, argv, NULL);
PL_exit_flags |= PERL_EXIT_DESTRUCT_END;
/*** skipping perl_run() ***/
call_sv(cvrv, G_VOID|G_NOARGS);
perl_destruct(my_perl);
perl_free(my_perl);
PERL_SYS_TERM();
}
MODULE = Example PACKAGE = Example
NOTE: I back to XS and "make" since Inline has problems with compile this code.
With make I compile this code fine to Example.c
then with
cc -o interp Example.c `perl -MExtUtils::Embed -e ccopts -e ldopts`
produce executable file "interp". Up to this point everything went ok. The problem occur when i try tu run "interp":
% ./interp
returns :
Segmentation fault.
I think problem is in line:
SV *cvrv = eval_pv("sub { print 'You will not find me cluttering any namespace!' }", TRUE);"
Documentation corresponding with this code:
http://perldoc.perl.org/perlcall.html#Creating-and-Calling-an-Anonymous-Subroutine-in-C
Do you know what is wrong ?
Thanks ;)
|