| /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);
|
| H A D | multicall.t | 100 for my $gimme (G_VOID, G_SCALAR, G_LIST) {
|
| /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 | 1141 context = G_LIST;
1156 context = G_LIST;
1160 context = G_LIST;
1182 context |= (GIMME_V & (~(G_LIST|G_SCALAR|G_VOID)));
1227 list_context = (GIMME_V == G_LIST);
1752 ST(0) = ((thread->gimme & G_WANT) == G_LIST) ? &PL_sv_yes :
|
| /openbsd/gnu/usr.bin/perl/ |
| H A D | pp.c | 430 if (GIMME_V != G_LIST) { in PP()
5008 if (GIMME_V != G_LIST) { in PP()
5053 if (GIMME_V != G_LIST) { in PP()
5080 if (gimme == G_LIST) { in PP()
5148 if (gimme == G_LIST) { in PP()
5504 if (GIMME_V != G_LIST) { in PP()
5554 if (GIMME_V != G_LIST) { in PP()
5567 if (GIMME_V != G_LIST) { in PP()
5595 if (GIMME_V != G_LIST) { in PP()
6065 if (GIMME_V == G_LIST) { in PP()
[all …]
|
| H A D | pp_hot.c | 1880 if (gimme == G_LIST) { in S_padhv_rv2hv_common()
1990 if (gimme == G_LIST) in PP()
2090 if (gimme != G_LIST) in PP()
2100 if (gimme == G_LIST) { in PP()
2478 U32 lval = (gimme == G_LIST) in PP()
2645 if (UNLIKELY(gimme == G_LIST)) { in PP()
3157 if (! (global && gimme == G_LIST)) in PP()
3310 if (gimme == G_LIST) in PP()
3512 if (gimme == G_LIST) { in Perl_do_readline()
4860 else if (gimme == G_LIST) in PP()
[all …]
|
| H A D | pp_ctl.c | 63 case G_LIST: in PP()
1119 if (gimme == G_LIST) { in PP()
1185 else if (gimme == G_LIST) in PP()
1212 if (GIMME_V == G_LIST) in PP()
1225 if (GIMME_V == G_LIST) { in PP()
1283 if (GIMME_V == G_LIST) { in PP()
2048 if (gimme != G_LIST) { in PP()
2060 if (gimme != G_LIST) { in PP()
2212 const U8 gimme = G_LIST; in PP()
2553 assert(gimme == G_LIST); in PP()
[all …]
|
| H A D | pp_sys.c | 2941 if (gimme != G_LIST) { in PP()
4112 } while (gimme == G_LIST); in PP()
4122 if (gimme == G_LIST) in PP()
4764 if (GIMME_V == G_LIST) { in PP()
4774 if (GIMME_V == G_LIST) { in PP()
5108 if (GIMME_V != G_LIST) { in PP()
5197 if (GIMME_V != G_LIST) { in PP()
5261 if (GIMME_V != G_LIST) { in PP()
5327 if (GIMME_V != G_LIST) { in PP()
5571 if (GIMME_V != G_LIST) { in PP()
[all …]
|
| H A D | builtin.c | 451 case G_LIST: in XS()
|
| H A D | universal.c | 1035 if ( gimme == G_LIST ) { in XS()
1082 if ( gimme == G_LIST ) { in XS()
|
| H A D | cop.h | 1188 #define G_LIST 3 macro
1194 # define G_ARRAY G_LIST
|
| H A D | pp.h | 637 else if (gimme == G_LIST) { \
|
| H A D | op.h | 180 ? G_LIST \
|
| H A D | class.c | 1032 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 | 1188 if (GIMME_V == G_LIST) {
1245 if (GIMME_V == G_LIST) {
1265 if (GIMME_V == G_LIST) {
1518 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
1061 if(GIMME_V == G_LIST) { in unpack_sockaddr_in()
1145 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 | 3335 if (GIMME_V == G_LIST) {
3357 if (GIMME_V == G_LIST) {
3383 if (GIMME_V == G_LIST) {
3393 if (GIMME_V == G_LIST) {
3417 if (GIMME_V == G_LIST) {
3427 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
|