Searched refs:newBINOP (Results 1 – 11 of 11) sorted by relevance
| /openbsd/src/gnu/usr.bin/perl/ |
| D | perly.y | 1154 { $$ = newBINOP(OP_GELEM, 0, $gelem, scalar($expr)); } 1156 { $$ = newBINOP(OP_AELEM, 0, oopsAV($array), scalar($expr)); 1159 { $$ = newBINOP(OP_AELEM, 0, 1164 { $$ = newBINOP(OP_AELEM, 0, 1169 { $$ = newBINOP(OP_HELEM, 0, oopsHV($hash), jmaybe($expr)); 1172 { $$ = newBINOP(OP_HELEM, 0, 1176 { $$ = newBINOP(OP_HELEM, 0, 1222 { $$ = newBINOP($POWOP, 0, scalar($lhs), scalar($rhs)); } 1228 $$ = newBINOP($MULOP, 0, $lhs, scalar($rhs)); 1233 { $$ = newBINOP($ADDOP, 0, scalar($lhs), scalar($rhs)); } [all …]
|
| D | perly.act | 1341 … { (yyval.opval) = newBINOP(OP_GELEM, 0, (ps[-4].val.opval), scalar((ps[-2].val.opval))); } 1347 … { (yyval.opval) = newBINOP(OP_AELEM, 0, oopsAV((ps[-3].val.opval)), scalar((ps[-1].val.opval))); 1354 { (yyval.opval) = newBINOP(OP_AELEM, 0, 1363 { (yyval.opval) = newBINOP(OP_AELEM, 0, 1372 … { (yyval.opval) = newBINOP(OP_HELEM, 0, oopsHV((ps[-4].val.opval)), jmaybe((ps[-2].val.opval))); 1379 { (yyval.opval) = newBINOP(OP_HELEM, 0, 1387 { (yyval.opval) = newBINOP(OP_HELEM, 0, 1473 …{ (yyval.opval) = newBINOP((ps[-1].val.ival), 0, scalar((ps[-2].val.opval)), scalar((ps[0].val.opv… 1487 … (yyval.opval) = newBINOP((ps[-1].val.ival), 0, (ps[-2].val.opval), scalar((ps[0].val.opval))); 1500 …{ (yyval.opval) = newBINOP((ps[-1].val.ival), 0, scalar((ps[-2].val.opval)), scalar((ps[0].val.opv… [all …]
|
| D | op.c | 4292 o = newBINOP(OP_NULL, OPf_STACKED, scalar(left), right); in Perl_bind_match() 8285 return newBINOP(OP_LSLICE, flags, in Perl_newSLICEOP() 8450 newBINOP(OP_SASSIGN, OPpASSIGN_BACKWARDS<<8, right, right)); in Perl_newASSIGNOP() 8452 return newBINOP(optype, OPf_STACKED, in Perl_newASSIGNOP() 8468 o = newBINOP(OP_AASSIGN, flags, list(op_force_list(right)), curop); in Perl_newASSIGNOP() 8616 return newBINOP(OP_REFASSIGN, flags, scalar(right), left); in Perl_newASSIGNOP() 8621 return newBINOP(OP_NULL, flags, op_lvalue(scalar(left), OP_SASSIGN), in Perl_newASSIGNOP() 8625 o = newBINOP(OP_SASSIGN, flags, in Perl_newASSIGNOP() 8817 return newBINOP(type, flags, scalar(first), scalar(other)); in S_new_logop() 9381 o = newBINOP(OP_LEAVELOOP, 0, (OP*)loop, o); in Perl_newWHILEOP() [all …]
|
| D | class.c | 741 newBINOP(OP_HELEM, 0, in Perl_class_seal_stash()
|
| D | embed.h | 389 # define newBINOP(a,b,c,d) Perl_newBINOP(aTHX_ a,b,c,d) macro
|
| D | embed.fnc | 2134 ARdp |OP * |newBINOP |I32 type \
|
| /openbsd/src/gnu/usr.bin/perl/pod/ |
| D | perlinterp.pod | 672 4 { $$ = newBINOP($2, 0, scalar($1), scalar($3)); } 700 { $$ = newBINOP($2, 0, scalar($1), scalar($3)); } 706 call C<newBINOP> to create a new binary operator. The first parameter 707 to C<newBINOP>, a function in F<op.c>, is the op type. It's an addition 715 C<newBINOP>, call a "check" function associated with each op type, before 722 C<newBINOP> as its first argument.) Here is the relevant line:
|
| /openbsd/src/gnu/usr.bin/perl/ext/XS-APItest/ |
| D | APItest.xs | 621 sumop = newBINOP(OP_ADD, 0, sumop, aop); in THX_ck_entersub_multi_sum() 936 push_rpn_item(newBINOP(OP_I_ADD, 0, a, b)); in THX_parse_rpn_expr() 942 push_rpn_item(newBINOP(OP_I_SUBTRACT, 0, a, b)); in THX_parse_rpn_expr() 948 push_rpn_item(newBINOP(OP_I_MULTIPLY, 0, a, b)); in THX_parse_rpn_expr() 954 push_rpn_item(newBINOP(OP_I_DIVIDE, 0, a, b)); in THX_parse_rpn_expr() 960 push_rpn_item(newBINOP(OP_I_MODULO, 0, a, b)); in THX_parse_rpn_expr() 1485 return newBINOP(OP_SUBTRACT, flags, aop, bop); in addissub_myck_add() 4720 o = newBINOP(OP_CUSTOM, 0, NULL, NULL); in test_newOP_CUSTOM()
|
| /openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/todo/ |
| D | 5003007 | 331 newBINOP # T
|
| /openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/base/ |
| D | 5003007 | 929 newBINOP # T
|
| /openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/ |
| D | embed.fnc | 1481 ApdR |OP* |newBINOP |I32 type|I32 flags|NULLOK OP* first|NULLOK OP* last
|