Home
last modified time | relevance | path

Searched refs:G_LIST (Results 1 – 25 of 38) sorted by relevance

12

/openbsd/src/gnu/usr.bin/perl/ext/XS-APItest/t/
Dcall.t63 [ 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,
Dmulticall.t100 for my $gimme (G_VOID, G_SCALAR, G_LIST) {
/openbsd/src/gnu/usr.bin/perl/t/bigmem/
Dstack.t183 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/src/gnu/usr.bin/perl/cpan/Scalar-List-Utils/
DListUtil.xs973 if(ret_gimme == G_LIST) { in pairfirst()
1000 if(ret_gimme == G_LIST) { in pairfirst()
1055 if(ret_gimme == G_LIST) { in pairgrep()
1066 if(ret_gimme == G_LIST) in pairgrep()
1084 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()
1217 count = call_sv((SV*)cv, G_LIST); in pairmap()
1221 if(count > 2 && !args_copy && ret_gimme == G_LIST) { in pairmap()
[all …]
/openbsd/src/gnu/usr.bin/perl/ext/File-Glob/
DGlob.xs111 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/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/base/
D50350013 G_LIST # E
/openbsd/src/gnu/usr.bin/perl/ext/XS-APItest/
DMakefile.PL25 G_SCALAR G_LIST G_VOID G_DISCARD G_EVAL G_NOARGS
/openbsd/src/gnu/usr.bin/perl/dist/threads/
Dthreads.xs1142 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/src/gnu/usr.bin/perl/
Dpp_ctl.c67 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()
1324 PP_wrapped(pp_flip,((GIMME_V == G_LIST) ? 0 : 1), 0)
1328 if (GIMME_V == G_LIST) {
1384 PP_wrapped(pp_flop, (GIMME_V == G_LIST) ? 2 : 1, 0)
1388 if (GIMME_V == G_LIST) {
2190 if (gimme != G_LIST) {
2238 if (gimme != G_LIST) {
[all …]
Dpp_sys.c407 else if (gimme == G_LIST) { in PP()
1519 if (GIMME_V == G_LIST && tbuf) {
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) {
5072 if (GIMME_V != G_LIST) { /* scalar context */
5326 if (GIMME_V != G_LIST) {
5418 if (GIMME_V != G_LIST) {
[all …]
Dpp_hot.c1607 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()
3849 if (global && (gimme != G_LIST || (dynpm->op_pmflags & PMf_CONTINUE))) { in PP()
3859 if ((!RXp_NPARENS(prog) && !global) || gimme != G_LIST) { in PP()
3970 if (gimme != G_LIST) { in PP()
[all …]
Dpp.c238 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) {
5865 GIMME_V == G_LIST ? "list" : "scalar"); in PP()
5943 if (GIMME_V != G_LIST) {
6183 if (GIMME_V == G_LIST) { /* copy return vals to stack */
6281 if (GIMME_V == G_LIST) { /* copy return vals to stack */
[all …]
Duniversal.c1079 if ( gimme == G_LIST ) { in XS()
1126 if ( gimme == G_LIST ) { in XS()
Dcop.h1194 #define G_LIST 3 macro
1200 # define G_ARRAY G_LIST
Dbuiltin.c509 case G_LIST: in XS()
Dop.h180 ? G_LIST \
Dclass.c1141 defop = op_contextualize(op_force_list(defop), G_LIST); in Perl_class_set_field_defop()
Dpp_sort.c711 if (gimme != G_LIST) { in PP()
/openbsd/src/gnu/usr.bin/perl/dist/Time-HiRes/
DHiRes.xs1196 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/src/gnu/usr.bin/perl/cpan/Socket/
DSocket.xs306 #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/src/gnu/usr.bin/perl/pod/
Dperlcall.pod125 C<G_SCALAR>, or C<G_LIST>, which indicate the call context, OR'ed together
197 =head2 G_LIST section in FLAG VALUES
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/src/gnu/usr.bin/perl/ext/POSIX/
DPOSIX.xs3331 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/src/gnu/usr.bin/perl/ext/Opcode/
DOpcode.xs534 if (GIMME_V == G_LIST) {
/openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/inc/
Dcall45 __UNDEFINED__ G_LIST G_ARRAY /* Replace */
/openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/todo/
D5003007116 G_LIST # T

12