Searched defs:my_perl (Results 1 - 3 of 3) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dminiperlmain.c30 static PerlInterpreter *my_perl; variable
77 my_perl = perl_alloc();
78 if (!my_perl)
80 perl_construct(my_perl);
84 exitstatus = perl_parse(my_perl, xs_init, argc, argv, (char **)NULL);
86 perl_run(my_perl);
88 exitstatus = perl_destruct(my_perl);
90 perl_free(my_perl);
H A Dperl.c123 PERL_SET_INTERP(my_perl); \
133 PERL_SET_INTERP(my_perl); \
136 PERL_SET_THX(my_perl); \
141 PERL_SET_THX(my_perl); \
148 PERL_SET_INTERP(my_perl); \
150 PERL_SET_THX(my_perl); \
163 PerlInterpreter *my_perl; local
165 my_perl = (PerlInterpreter*)(*ipM->pMalloc)(ipM, sizeof(PerlInterpreter));
167 Zero(my_perl, 1, PerlInterpreter);
178 return my_perl;
195 PerlInterpreter *my_perl; local
[all...]
H A Dsv.c10667 PerlInterpreter *my_perl = (PerlInterpreter*)(*ipM->pMalloc)(ipM, sizeof(PerlInterpreter)); local
10668 PERL_SET_THX(my_perl);
10671 Poison(my_perl, 1, PerlInterpreter);
10681 Zero(my_perl, 1, PerlInterpreter);
10698 PerlInterpreter *my_perl = (PerlInterpreter*)PerlMem_malloc(sizeof(PerlInterpreter));
10699 PERL_SET_THX(my_perl);
10704 Poison(my_perl, 1, PerlInterpreter);
10714 Zero(my_perl, 1, PerlInterpreter);
11442 return my_perl;

Completed in 61 milliseconds