Searched refs:HINT_NO_AMAGIC (Results 1 – 5 of 5) sorted by relevance
6 my $HINT_NO_AMAGIC = 0x01000000; # see perl.h29 $^H &= ~$HINT_NO_AMAGIC;33 $^H &= ~$HINT_NO_AMAGIC;40 if ( exists $^H{overloading} or not $^H & $HINT_NO_AMAGIC ) {48 $^H |= $HINT_NO_AMAGIC;
23 HINT_NO_AMAGIC # Z added by devel/scanprov
3667 assert(PL_curcop->cop_hints & HINT_NO_AMAGIC); in Perl_amagic_is_enabled()3738 if ( PL_curcop->cop_hints & HINT_NO_AMAGIC ) { in Perl_amagic_call()
5972 #define HINT_NO_AMAGIC 0x01000000 /* overloading pragma */ macro
2917 (!(PL_curcop->cop_hints & HINT_NO_AMAGIC) || in Perl_sv_2pv_flags()