view release on metacpan or  search on metacpan

a2p.c  view on Meta::CPAN

		    if (!yyvsp[-2]) need_entire = TRUE;
		    if (ops[yyvsp[0]].ival != OSTR + (1<<8)) do_fancy_opens = TRUE; }
break;
case 120:
#line 370 "a2p.y"
{ yyval = oper1(OPRINT,yyvsp[0]);
		    if (!yyvsp[0]) need_entire = TRUE;
		    saw_ORS = saw_OFS = TRUE;
		}
break;
case 121:
#line 375 "a2p.y"
{ yyval = oper3(OPRINTF,yyvsp[-2],yyvsp[-1],yyvsp[0]);
		    do_opens = TRUE;
		    if (!yyvsp[-2]) need_entire = TRUE;
		    if (ops[yyvsp[0]].ival != OSTR + (1<<8)) do_fancy_opens = TRUE; }
break;
case 122:
#line 380 "a2p.y"
{ yyval = oper1(OPRINTF,yyvsp[0]);
		    if (!yyvsp[0]) need_entire = TRUE;
		}
break;
case 123:
#line 384 "a2p.y"
{ yyval = oper0(OBREAK); }
break;
case 124:
#line 386 "a2p.y"
{ yyval = oper0(ONEXT); }
break;
case 125:
#line 388 "a2p.y"
{ yyval = oper0(OEXIT); }
break;
case 126:
#line 390 "a2p.y"
{ yyval = oper1(OEXIT,yyvsp[0]); }
break;
case 127:
#line 392 "a2p.y"
{ yyval = oper0(OCONTINUE); }
break;
case 128:
#line 394 "a2p.y"
{ yyval = oper0(ORETURN); }
break;
case 129:
#line 396 "a2p.y"
{ yyval = oper1(ORETURN,yyvsp[0]); }
break;
case 130:
#line 398 "a2p.y"
{ yyval = oper2(ODELETE,aryrefarg(yyvsp[-3]),yyvsp[-1]); }
break;
case 131:
#line 402 "a2p.y"
{ yyval = oper1(OREDIR,string(">",1)); }
break;
case 132:
#line 404 "a2p.y"
{ yyval = oper1(OREDIR,string(">>",2)); }
break;
case 133:
#line 406 "a2p.y"
{ yyval = oper1(OREDIR,string("|",1)); }
break;
case 134:
#line 411 "a2p.y"
{ yyval = oper2(OIF,yyvsp[-3],bl(yyvsp[0],yyvsp[-1])); }
break;
case 135:
#line 413 "a2p.y"
{ yyval = oper3(OIF,yyvsp[-6],bl(yyvsp[-3],yyvsp[-4]),bl(yyvsp[0],yyvsp[-1])); }
break;
case 136:
#line 415 "a2p.y"
{ yyval = oper2(OWHILE,yyvsp[-3],bl(yyvsp[0],yyvsp[-1])); }
break;
case 137:
#line 417 "a2p.y"
{ yyval = oper2(ODO,bl(yyvsp[-4],yyvsp[-5]),yyvsp[-1]); }
break;
case 138:
#line 419 "a2p.y"
{ yyval = oper4(OFOR,yyvsp[-7],yyvsp[-5],yyvsp[-3],bl(yyvsp[0],yyvsp[-1])); }
break;
case 139:
#line 421 "a2p.y"
{ yyval = oper4(OFOR,yyvsp[-6],string("",0),yyvsp[-3],bl(yyvsp[0],yyvsp[-1])); }
break;
case 140:
#line 423 "a2p.y"
{ yyval = oper2(OFORIN,yyvsp[-3],bl(yyvsp[0],yyvsp[-1])); }
break;
case 141:
#line 425 "a2p.y"
{ yyval = oper3(OBLOCK,oper2(OJUNK,yyvsp[-3],yyvsp[-2]),Nullop,yyvsp[0]); }
break;
#line 2878 "y.tab.c"
    }
    yyssp -= yym;
    yystate = *yyssp;
    yyvsp -= yym;
    yym = yylhs[yyn];
    if (yystate == 0 && yym == 0)
    {
#if YYDEBUG
        if (yydebug)
            printf("%sdebug: after reduction, shifting from state 0 to\
 state %d\n", YYPREFIX, YYFINAL);
#endif
        yystate = YYFINAL;
        *++yyssp = YYFINAL;
        *++yyvsp = yyval;
        if (yychar < 0)
        {
            if ((yychar = yylex()) < 0) yychar = 0;
#if YYDEBUG
            if (yydebug)
            {