Searched refs:my_perl (Results 1 - 6 of 6) 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 Dperl.h114 # define pTHX register PerlInterpreter *my_perl PERL_UNUSED_DECL
115 # define aTHX my_perl
191 # define pTHXx register PerlInterpreter *my_perl
193 # define aTHXx my_perl
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;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/t/
H A DEmbed.t158 PerlInterpreter *my_perl;
162 my_perl = perl_alloc();
166 perl_construct(my_perl);
170 perl_parse(my_perl, NULL, (sizeof(cmds)/sizeof(char *))-1, cmds, env);
176 perl_run(my_perl);
180 perl_destruct(my_perl);
184 perl_free(my_perl);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/B/
H A DC.pm1479 static PerlInterpreter *my_perl;
1549 my_perl = perl_alloc();
1550 if (!my_perl)
1552 perl_construct( my_perl );
1604 exitstatus = perl_parse(my_perl, xs_init, argc + options_count - 1,
1657 exitstatus = perl_run( my_perl );
1659 perl_destruct( my_perl );
1660 perl_free( my_perl );

Completed in 72 milliseconds