Select Code to Download

lib\CORE/op.h:#define GIMME_V                OP_GIMME(PL_op, block_gim
+me())

((((*Perl_Top_ptr(((PerlInterpreter *)pthread_getspecific((*Perl_Gthr_
+key_ptr(((void *)0))))))))->op_flags & 3) == 1 ? 128 : (((*Perl_Top_p
+tr(((PerlInterpreter *)pthread_getspecific((*Perl_Gthr_key_ptr(((void
+ *)0))))))))->op_flags & 3) == 2 ? 0 : (((*Perl_Top_ptr(((PerlInterpr
+eter *)pthread_getspecific((*Perl_Gthr_key_ptr(((void *)0))))))))->op
+_flags & 3) == 3 ? 1 : Perl_block_gimme(((PerlInterpreter *)pthread_g
+etspecific((*Perl_Gthr_key_ptr(((void *)0))))))))