Searched refs:cop (Results 1 - 17 of 17) sorted by relevance
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/ |
| H A D | defsubs_h.PL | 53 foreach my $file (qw(op.h cop.h))
|
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/ByteLoader/ |
| H A D | bytecode.h | 290 #define BSET_cop_file(cop, arg) CopFILE_set(cop,arg)
291 #define BSET_cop_stashpv(cop, arg) CopSTASHPV_set(cop,arg)
296 #define BSET_cop_filegv(cop, arg) CopFILEGV_set(cop,arg)
297 #define BSET_cop_stash(cop,arg) CopSTASH_set(cop,(HV*)arg)
|
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/ |
| H A D | cv.h | 67 # define CvFILE_set_from_cop(sv, cop) (CvFILE(sv) = savepv(CopFILE(cop)))
69 # define CvFILE_set_from_cop(sv, cop) (CvFILE(sv) = CopFILE(cop))
|
| H A D | op.c | 466 S_cop_free(pTHX_ COP* cop) argument
468 Safefree(cop->cop_label); /* FIXME: treaddead ??? */
469 CopFILE_free(cop);
470 CopSTASH_free(cop);
471 if (! specialWARN(cop->cop_warnings))
472 SvREFCNT_dec(cop->cop_warnings);
473 if (! specialCopIO(cop->cop_io)) {
477 char *s = SvPV(cop->cop_io,len);
481 SvREFCNT_dec(cop->cop_io);
3357 register COP *cop; local
[all...] |
| H A D | util.c | 916 S_closest_cop(pTHX_ COP *cop, OP *o) argument
918 /* Look for PL_op starting from o. cop is the last COP we've seen. */
920 if (!o || o == PL_op) return cop;
932 cop = (COP *)kid;
936 new_cop = closest_cop(cop, kid);
951 COP *cop; local
958 * PL_curcop, but it might be a cop that has been optimised away. We
959 * can try to find such a cop by searching through the optree starting
963 cop = closest_cop(PL_curcop, PL_curcop->op_sibling);
964 if (!cop) co
[all...] |
| H A D | cop.h | 0 /* cop.h
12 * At run time, PL_curcop is set to point to the most recently executed cop,
16 struct cop { struct
|
| H A D | perl.h | 1754 typedef struct cop COP;
2346 #include "cop.h"
|
| H A D | proto.h | 986 STATIC void S_cop_free(pTHX_ COP *cop);
1274 STATIC COP* S_closest_cop(pTHX_ COP *cop, OP *o);
|
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/B/ |
| H A D | Bytecode.pm | 614 my ($cop,$ix) = @_;
615 my $warnix = $cop->warnings->ix;
616 my $ioix = $cop->io->ix;
618 $cop->B::OP::bsave($ix);
619 asm "cop_stashpv", pvix $cop->stashpv;
620 asm "cop_file", pvix $cop->file;
622 my $stashix = $cop->stash->ix;
623 my $fileix = $cop->filegv->ix(1);
624 $cop->B::OP::bsave($ix);
628 asm "cop_label", pvix $cop
[all...] |
| H A D | Deparse.pm | 639 my $cop = $self->{'curcop'};
640 my($line, $file) = ($cop->line, $cop->file);
|
| H A D | C.pm | 1982 cop => \$copsect, padop => \$padopsect,
|
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Locale/ |
| H A D | Script.pm | 210 co:cop:205:Coptic
|
| H A D | Currency.pm | 170 cop:Colombian Peso
|
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/I18N/LangTags/ |
| H A D | List.pm | 513 =item {cop} : Coptic
|
| /osnet-11/usr/src/lib/libc/port/gen/ |
| H A D | nss_common.c | 758 switch (next->cop) {
|
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/ |
| H A D | MM_VMS.pm | 1587 $(OBJECT) : $(PERL_INC)cop.h, $(PERL_INC)cv.h, $(PERL_INC)embed.h
|
| H A D | MM_Unix.pm | 3181 $(PERL_INC)/cop.h \
|
Completed in 671 milliseconds