Hello,

First, thanks for the Inline::C package, which is well build, and very usefull 
for me.

I would like that "C code"   call   "perl sub"    but    many times.

When I execute the script I have a "panic: memory wrap"...

Is there a solution to do that...

Thanks.

Laurent

 use Inline C;
# use Inline 'NoClean', 'FORCE', 'INFO' ;
# use Inline Config => WARNINGS => 4; 

use strict;

# c_func_1('This is the first line');
c_func_2('This is the second line');
    
    sub perl_sub_1 {
        print map "$_\n", @_;
    }
    
__DATA__
__C__
    
void c_func_1(SV* text) {
 c_func_2(text);
}
    
void c_func_2(SV* text) {

int i = 0;

for (i=0;i<10;i++)
{
 perl_call_pv("main::perl_sub_1", 0);
 //SPAGAIN;
}

}

void cont (void) {
}
___________________________________________________________
Les 10 aliments pour lutter contre le rhume ou la grippe sont sur Voila.fr 
http://actu.voila.fr/evenementiel/sante-bien-etre/aliments-anti-rhume/

Reply via email to