/openbsd/gnu/usr.bin/perl/ext/XS-APItest/t/ |
H A D | call.t | 63 [ G_LIST, [ ], [ qw(x 1) ], '0 args, G_LIST' ], 64 [ G_LIST, [ qw(a p q) ], [ qw(b p x 3) ], '3 args, G_LIST' ], 92 my $returnval = ((($flags & G_WANT) == G_LIST) || ($flags & G_DISCARD)) 317 @ret = eval_sv($code, G_LIST|$keep); 321 @ret = call_sv($code, G_EVAL|G_LIST|$keep); 347 is(eval_sv('my $z = fc("A") eq fc("a"); 1', G_LIST), 0, 349 is(eval_sv('my $z = fc("A") eq fc("a"); 1', G_LIST | G_USEHINTS), 1, 354 is(eval_sv('$z = 1', G_LIST), 1, 356 is(eval_sv('$z = 1', G_LIST | G_USEHINTS), 0,
|
H A D | multicall.t | 100 for my $gimme (G_VOID, G_SCALAR, G_LIST) {
|
/openbsd/gnu/usr.bin/perl/t/bigmem/ |
H A D | stack.t | 183 my $count = ( @x, XS::APItest::eval_sv('@x', G_LIST) )[-1]; 191 my $ret_count = XS::APItest::call_sv(\&arg_count, G_LIST, x()); 198 my $ret_count = ( x(), XS::APItest::call_sv(\&list, G_LIST) )[-1];
|
/openbsd/gnu/usr.bin/perl/cpan/Scalar-List-Utils/ |
H A D | ListUtil.xs | 1066 if(ret_gimme == G_LIST) in pairgrep() 1094 if(ret_gimme == G_LIST) in pairgrep() 1136 I32 gimme = G_LIST; in pairmap() 1199 if(ret_gimme == G_LIST) in pairmap() 1232 if(ret_gimme == G_LIST) in pairmap() 1242 if(ret_gimme == G_LIST) in pairmap() 1362 if(GIMME_V == G_LIST) in uniq() 1410 if(GIMME_V == G_LIST) in uniq() 1416 if(GIMME_V == G_LIST) in uniq() 1566 if(GIMME_V == G_LIST) in uniqnum() [all …]
|
/openbsd/gnu/usr.bin/perl/ext/File-Glob/ |
H A D | Glob.xs | 111 if (gimme != G_LIST) in iterate() 123 if (gimme == G_LIST) { in iterate() 289 if (!patav && gimme == G_LIST) { PUTBACK; return TRUE; } in csh_glob() 326 if (GIMME_V == G_LIST) { PUTBACK; return TRUE; } in doglob_iter_wrapper()
|
/openbsd/gnu/usr.bin/perl/dist/Devel-PPPort/parts/base/ |
H A D | 5035001 | 3 G_LIST # E
|
/openbsd/gnu/usr.bin/perl/ext/XS-APItest/ |
H A D | Makefile.PL | 25 G_SCALAR G_LIST G_VOID G_DISCARD G_EVAL G_NOARGS
|
/openbsd/gnu/usr.bin/perl/dist/threads/ |
H A D | threads.xs | 1142 context = G_LIST; 1157 context = G_LIST; 1161 context = G_LIST; 1183 context |= (GIMME_V & (~(G_LIST|G_SCALAR|G_VOID))); 1228 list_context = (GIMME_V == G_LIST); 1757 ST(0) = ((thread->gimme & G_WANT) == G_LIST) ? &PL_sv_yes :
|
/openbsd/gnu/usr.bin/perl/ |
H A D | pp_ctl.c | 67 case G_LIST: in PP() 1189 if (gimme == G_LIST) { in PP() 1271 if (gimme == G_LIST) in PP() 1314 if (GIMME_V == G_LIST) in PP() 1328 if (GIMME_V == G_LIST) { 1388 if (GIMME_V == G_LIST) { 2190 if (gimme != G_LIST) { 2238 if (gimme != G_LIST) { 2374 const U8 gimme = G_LIST; in PP() 2748 assert(gimme == G_LIST); in PP() [all …]
|
H A D | pp_sys.c | 3169 if (gimme != G_LIST) { 4339 } while (gimme == G_LIST); 4341 if (!dp && gimme != G_LIST) 4349 if (gimme == G_LIST) 4989 if (GIMME_V == G_LIST) { 5326 if (GIMME_V != G_LIST) { 5418 if (GIMME_V != G_LIST) { 5485 if (GIMME_V != G_LIST) { 5554 if (GIMME_V != G_LIST) { 5800 if (GIMME_V != G_LIST) { [all …]
|
H A D | pp_hot.c | 1607 else if (gimme == G_LIST) { in PP() 2202 if (gimme == G_LIST) { in S_padhv_rv2hv_common() 2344 if (gimme == G_LIST) in PP() 2455 if (gimme != G_LIST) in PP() 2465 if (gimme == G_LIST) { in PP() 2885 bool is_list = (gimme == G_LIST); in PP() 3816 if (! (global && gimme == G_LIST)) in PP() 3970 if (gimme != G_LIST) { in PP() 4319 if (gimme == G_LIST) { in Perl_do_readline() 5720 if (gimme == G_LIST) in PP() [all …]
|
H A D | pp.c | 238 if (type != SVt_PV && GIMME_V == G_LIST) { in Perl_softref2xv() 1793 if (gimme == G_LIST && PL_op->op_private & OPpREPEAT_DOLIST) { 1858 if (gimme == G_LIST && PL_op->op_private & OPpREPEAT_DOLIST) { 5414 if (gimme == G_LIST) { 5434 else if (gimme == G_LIST) { 5482 if (gimme == G_LIST) { 5943 if (GIMME_V != G_LIST) { 6460 if (GIMME_V == G_LIST) { 7007 if (gimme != G_LIST) { 7025 if (gimme == G_LIST) { [all …]
|
H A D | universal.c | 1079 if ( gimme == G_LIST ) { in XS() 1126 if ( gimme == G_LIST ) { in XS()
|
H A D | cop.h | 1194 #define G_LIST 3 macro 1200 # define G_ARRAY G_LIST
|
H A D | builtin.c | 509 case G_LIST: in XS()
|
H A D | op.h | 180 ? G_LIST \
|
H A D | class.c | 1141 defop = op_contextualize(op_force_list(defop), G_LIST); in Perl_class_set_field_defop()
|
H A D | pp_sort.c | 711 if (gimme != G_LIST) { in PP()
|
/openbsd/gnu/usr.bin/perl/dist/Time-HiRes/ |
H A D | HiRes.xs | 1196 if (GIMME_V == G_LIST) { 1253 if (GIMME_V == G_LIST) { 1273 if (GIMME_V == G_LIST) { 1526 fakeop.op_flags = GIMME_V == G_LIST ? OPf_WANT_LIST :
|
/openbsd/gnu/usr.bin/perl/cpan/Socket/ |
H A D | Socket.xs | 306 #ifndef G_LIST 307 # define G_LIST G_ARRAY macro 1053 if(GIMME_V == G_LIST) { in unpack_sockaddr_in() 1136 if(GIMME_V == G_LIST) { in unpack_sockaddr_in6()
|
/openbsd/gnu/usr.bin/perl/pod/ |
H A D | perlcall.pod | 125 C<G_SCALAR>, or C<G_LIST>, which indicate the call context, OR'ed together 197 =head2 G_LIST section 199 =for apidoc AmnUh||G_LIST 228 G_LIST flag and the mechanics of accessing the returned items from the 239 context to the Perl subroutine by using either G_SCALAR or G_LIST. 318 If G_LIST is specified I<and> an error has occurred, the return value 376 C<G_LIST> if you have been called in a list context, C<G_SCALAR> if 754 count = call_pv("AddSubtract", G_LIST); 784 We wanted list context, so G_LIST was used. 1871 count = call_pv("AddSubtract", G_LIST); [all …]
|
/openbsd/gnu/usr.bin/perl/ext/POSIX/ |
H A D | POSIX.xs | 3331 if (GIMME_V == G_LIST) { 3353 if (GIMME_V == G_LIST) { 3380 if (GIMME_V == G_LIST) { 3390 if (GIMME_V == G_LIST) { 3415 if (GIMME_V == G_LIST) { 3425 if (GIMME_V == G_LIST) {
|
/openbsd/gnu/usr.bin/perl/ext/Opcode/ |
H A D | Opcode.xs | 534 if (GIMME_V == G_LIST) {
|
/openbsd/gnu/usr.bin/perl/dist/Devel-PPPort/parts/inc/ |
H A D | call | 45 __UNDEFINED__ G_LIST G_ARRAY /* Replace */
|
/openbsd/gnu/usr.bin/perl/dist/Devel-PPPort/parts/todo/ |
H A D | 5003007 | 116 G_LIST # T
|