~vcs-imports/gawk/master

    {

        case 3:

 

#line 199 "awkgram.y"

    {

                rule = 0;

 

  case 5:

 

#line 205 "awkgram.y"

    {

                next_sourcefile();

 

  case 6:

 

#line 209 "awkgram.y"

    {

                rule = 0;

 

  case 7:

 

#line 221 "awkgram.y"

    {

                (void) append_rule((yyvsp[(1) - (2)]), (yyvsp[(2) - (2)]));

 

  case 8:

 

#line 225 "awkgram.y"

    {

                if (rule != Rule) {

 

  case 9:

 

#line 236 "awkgram.y"

    {

                in_function = NULL;

 

  case 10:

 

#line 242 "awkgram.y"

    {

                want_source = FALSE;

 

  case 11:

 

#line 250 "awkgram.y"

    {

                if (include_source((yyvsp[(1) - (1)])) < 0)

 

  case 12:

 

#line 258 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 13:

 

#line 260 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 14:

 

#line 265 "awkgram.y"

    {   (yyval) = NULL; rule = Rule; }

    break;

 

  case 15:

 

#line 267 "awkgram.y"

    {   (yyval) = (yyvsp[(1) - (1)]); rule = Rule; }

    break;

 

  case 16:

 

#line 269 "awkgram.y"

    {

                INSTRUCTION *tp;

 

  case 17:

 

#line 295 "awkgram.y"

    {

                static int begin_seen = 0;

 

  case 18:

 

#line 306 "awkgram.y"

    {

                static int end_seen = 0;

 

  case 19:

 

#line 317 "awkgram.y"

    {

                (yyvsp[(1) - (1)])->in_rule = rule = BEGINFILE;

 

  case 20:

 

#line 323 "awkgram.y"

    {

                (yyvsp[(1) - (1)])->in_rule = rule = ENDFILE;

 

  case 21:

 

#line 332 "awkgram.y"

    {

                if ((yyvsp[(2) - (5)]) == NULL)

 

  case 22:

 

#line 342 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 23:

 

#line 344 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 24:

 

#line 346 "awkgram.y"

    {

                yyerror(_("`%s' is a built-in function, it cannot be redefined"),

 

  case 25:

 

#line 352 "awkgram.y"

    { (yyval) = (yyvsp[(2) - (2)]); }

    break;

 

  case 28:

 

#line 362 "awkgram.y"

    {

                (yyvsp[(1) - (6)])->source_file = source;

 

  case 29:

 

#line 380 "awkgram.y"

    { ++want_regexp; }

    break;

 

  case 30:

 

#line 382 "awkgram.y"

    {

                  NODE *n, *exp;

 

  case 31:

 

#line 414 "awkgram.y"

    { bcfree((yyvsp[(1) - (1)])); }

    break;

 

  case 33:

 

#line 420 "awkgram.y"

    {   (yyval) = NULL; }

    break;

 

  case 34:

 

#line 422 "awkgram.y"

    {

                if ((yyvsp[(2) - (2)]) == NULL)

 

  case 35:

 

#line 435 "awkgram.y"

    {   (yyval) = NULL; }

    break;

 

  case 38:

 

#line 445 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 39:

 

#line 447 "awkgram.y"

    { (yyval) = (yyvsp[(2) - (3)]); }

    break;

 

  case 40:

 

#line 449 "awkgram.y"

    {

                if (do_pretty_print)

 

  case 41:

 

#line 456 "awkgram.y"

    {

                INSTRUCTION *dflt, *curr = NULL, *cexp, *cstmt;

 

  case 42:

 

#line 546 "awkgram.y"

    { 

                /*

 

  case 43:

 

#line 588 "awkgram.y"

    {

                /*

 

  case 44:

 

#line 630 "awkgram.y"

    {

                INSTRUCTION *ip;

 

  case 45:

 

#line 743 "awkgram.y"

    {

                (yyval) = mk_for_loop((yyvsp[(1) - (12)]), (yyvsp[(3) - (12)]), (yyvsp[(6) - (12)]), (yyvsp[(9) - (12)]), (yyvsp[(12) - (12)]));

 

  case 46:

 

#line 750 "awkgram.y"

    {

                (yyval) = mk_for_loop((yyvsp[(1) - (11)]), (yyvsp[(3) - (11)]), (INSTRUCTION *) NULL, (yyvsp[(8) - (11)]), (yyvsp[(11) - (11)]));

 

  case 47:

 

#line 757 "awkgram.y"

    {

                if (do_pretty_print)

 

  case 48:

 

#line 767 "awkgram.y"

    { 

                if (! break_allowed)

 

  case 49:

 

#line 776 "awkgram.y"

    {

                if (! continue_allowed)

 

  case 50:

 

#line 785 "awkgram.y"

    {

                /* if inside function (rule = 0), resolve context at run-time */

 

  case 51:

 

#line 794 "awkgram.y"

    {

                if (do_traditional)

 

  case 52:

 

#line 809 "awkgram.y"

    {

                /* Initialize the two possible jump targets, the actual target

 

  case 53:

 

#line 824 "awkgram.y"

    {

                if (! in_function)

 

  case 54:

 

#line 827 "awkgram.y"

    {

                if ((yyvsp[(3) - (4)]) == NULL) {

 

  case 56:

 

#line 859 "awkgram.y"

    { in_print = TRUE; in_parens = 0; }

    break;

 

  case 57:

 

#line 860 "awkgram.y"

    {

                /*

 

  case 58:

 

#line 954 "awkgram.y"

    { sub_counter = 0; }

    break;

 

  case 59:

 

#line 955 "awkgram.y"

    {

                char *arr = (yyvsp[(2) - (4)])->lextok;

 

  case 60:

 

#line 984 "awkgram.y"

    {

                static short warned = FALSE;

 

  case 61:

 

#line 1003 "awkgram.y"

    {   (yyval) = optimize_assignment((yyvsp[(1) - (1)])); }

    break;

 

  case 62:

 

#line 1008 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 63:

 

#line 1010 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 64:

 

#line 1015 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 65:

 

#line 1017 "awkgram.y"

    {

                if ((yyvsp[(1) - (2)]) == NULL)

 

  case 66:

 

#line 1024 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 67:

 

#line 1029 "awkgram.y"

    {

                INSTRUCTION *casestmt = (yyvsp[(5) - (5)]);

 

  case 68:

 

#line 1041 "awkgram.y"

    {

                INSTRUCTION *casestmt = (yyvsp[(4) - (4)]);

 

  case 69:

 

#line 1055 "awkgram.y"

    {   (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 70:

 

#line 1057 "awkgram.y"

    { 

                NODE *n = (yyvsp[(2) - (2)])->memory;

 

  case 71:

 

#line 1068 "awkgram.y"

    {

                bcfree((yyvsp[(1) - (2)]));

 

  case 72:

 

#line 1073 "awkgram.y"

    {   (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 73:

 

#line 1075 "awkgram.y"

    {

                (yyvsp[(1) - (1)])->opcode = Op_push_re;

 

  case 74:

 

#line 1083 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 75:

 

#line 1085 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 77:

 

#line 1095 "awkgram.y"

    {

                (yyval) = (yyvsp[(2) - (3)]);

 

  case 78:

 

#line 1102 "awkgram.y"

    {

                in_print = FALSE;

 

  case 79:

 

#line 1107 "awkgram.y"

    { in_print = FALSE; in_parens = 0; }

    break;

 

  case 80:

 

#line 1108 "awkgram.y"

    {

                if ((yyvsp[(1) - (3)])->redir_type == redirect_twoway

 

  case 81:

 

#line 1119 "awkgram.y"

    {

                (yyval) = mk_condition((yyvsp[(3) - (6)]), (yyvsp[(1) - (6)]), (yyvsp[(6) - (6)]), NULL, NULL);

 

  case 82:

 

#line 1124 "awkgram.y"

    {

                (yyval) = mk_condition((yyvsp[(3) - (9)]), (yyvsp[(1) - (9)]), (yyvsp[(6) - (9)]), (yyvsp[(7) - (9)]), (yyvsp[(9) - (9)]));

 

  case 87:

 

#line 1141 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 88:

 

#line 1143 "awkgram.y"

    {

                bcfree((yyvsp[(1) - (2)]));

 

  case 89:

 

#line 1151 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 90:

 

#line 1153 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]) ; }

    break;

 

  case 91:

 

#line 1158 "awkgram.y"

    {

                (yyvsp[(1) - (1)])->param_count = 0;

 

  case 92:

 

#line 1163 "awkgram.y"

    {

                (yyvsp[(3) - (3)])->param_count =  (yyvsp[(1) - (3)])->lasti->param_count + 1;

 

  case 93:

 

#line 1169 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 94:

 

#line 1171 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (2)]); }

    break;

 

  case 95:

 

#line 1173 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (3)]); }

    break;

 

  case 96:

 

#line 1179 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 97:

 

#line 1181 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 98:

 

#line 1186 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 99:

 

#line 1188 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 100:

 

#line 1193 "awkgram.y"

    {   (yyval) = mk_expression_list(NULL, (yyvsp[(1) - (1)])); }

    break;

 

  case 101:

 

#line 1195 "awkgram.y"

    {

                (yyval) = mk_expression_list((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]));

 

  case 102:

 

#line 1200 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 103:

 

#line 1202 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 104:

 

#line 1204 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 105:

 

#line 1206 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 106:

 

#line 1212 "awkgram.y"

    {

                if (do_lint && (yyvsp[(3) - (3)])->lasti->opcode == Op_match_rec)

 

  case 107:

 

#line 1219 "awkgram.y"

    {   (yyval) = mk_boolean((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 108:

 

#line 1221 "awkgram.y"

    {   (yyval) = mk_boolean((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 109:

 

#line 1223 "awkgram.y"

    {

                if ((yyvsp[(1) - (3)])->lasti->opcode == Op_match_rec)

 

  case 110:

 

#line 1239 "awkgram.y"

    {

                if (do_lint_old)

 

  case 111:

 

#line 1249 "awkgram.y"

    {

                if (do_lint && (yyvsp[(3) - (3)])->lasti->opcode == Op_match_rec)

 

  case 112:

 

#line 1256 "awkgram.y"

    { (yyval) = mk_condition((yyvsp[(1) - (5)]), (yyvsp[(2) - (5)]), (yyvsp[(3) - (5)]), (yyvsp[(4) - (5)]), (yyvsp[(5) - (5)])); }

    break;

 

  case 113:

 

#line 1258 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 114:

 

#line 1263 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 115:

 

#line 1265 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 116:

 

#line 1267 "awkgram.y"

    {   

                (yyvsp[(2) - (2)])->opcode = Op_assign_quotient;

 

  case 117:

 

#line 1275 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 118:

 

#line 1277 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 119:

 

#line 1282 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 120:

 

#line 1284 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 121:

 

#line 1289 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 122:

 

#line 1291 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 123:

 

#line 1293 "awkgram.y"

    {

                int count = 2;

 

  case 125:

 

#line 1345 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 126:

 

#line 1347 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 127:

 

#line 1349 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 128:

 

#line 1351 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 129:

 

#line 1353 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 130:

 

#line 1355 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 131:

 

#line 1357 "awkgram.y"

    {

                /*

 

  case 132:

 

#line 1380 "awkgram.y"

    {

                (yyvsp[(2) - (2)])->opcode = Op_postincrement;

 

  case 133:

 

#line 1385 "awkgram.y"

    {

                (yyvsp[(2) - (2)])->opcode = Op_postdecrement;

 

  case 134:

 

#line 1390 "awkgram.y"

    {

                if (do_lint_old) {

 

  case 135:

 

#line 1415 "awkgram.y"

    {

                  (yyval) = mk_getline((yyvsp[(3) - (4)]), (yyvsp[(4) - (4)]), (yyvsp[(1) - (4)]), (yyvsp[(2) - (4)])->redir_type);

 

  case 136:

 

#line 1421 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 137:

 

#line 1423 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 138:

 

#line 1425 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 139:

 

#line 1427 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 140:

 

#line 1429 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 141:

 

#line 1431 "awkgram.y"

    { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }

    break;

 

  case 142:

 

#line 1436 "awkgram.y"

    {

                (yyval) = list_create((yyvsp[(1) - (1)]));

 

  case 143:

 

#line 1440 "awkgram.y"

    {

                if ((yyvsp[(2) - (2)])->opcode == Op_match_rec) {

 

  case 144:

 

#line 1472 "awkgram.y"

    { (yyval) = (yyvsp[(2) - (3)]); }

    break;

 

  case 145:

 

#line 1474 "awkgram.y"

    {

                (yyval) = snode((yyvsp[(3) - (4)]), (yyvsp[(1) - (4)]));

 

  case 146:

 

#line 1480 "awkgram.y"

    {

                (yyval) = snode((yyvsp[(3) - (4)]), (yyvsp[(1) - (4)]));

 

  case 147:

 

#line 1486 "awkgram.y"

    {

                static short warned1 = FALSE;

 

  case 150:

 

#line 1501 "awkgram.y"

    {

                (yyvsp[(1) - (2)])->opcode = Op_preincrement;

 

  case 151:

 

#line 1506 "awkgram.y"

    {

                (yyvsp[(1) - (2)])->opcode = Op_predecrement;

 

  case 152:

 

#line 1511 "awkgram.y"

    {

                (yyval) = list_create((yyvsp[(1) - (1)]));

 

  case 153:

 

#line 1515 "awkgram.y"

    {

                (yyval) = list_create((yyvsp[(1) - (1)]));

 

  case 154:

 

#line 1519 "awkgram.y"

    {

                if ((yyvsp[(2) - (2)])->lasti->opcode == Op_push_i

 

  case 155:

 

#line 1537 "awkgram.y"

    {

            /*

 

  case 156:

 

#line 1550 "awkgram.y"

    {

                func_use((yyvsp[(1) - (1)])->lasti->func_name, FUNC_USE);

 

  case 157:

 

#line 1555 "awkgram.y"

    {

                /* indirect function call */

 

  case 158:

 

#line 1591 "awkgram.y"

    {

                param_sanity((yyvsp[(3) - (4)]));

 

  case 159:

 

#line 1608 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 160:

 

#line 1610 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 161:

 

#line 1615 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 162:

 

#line 1617 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (2)]); }

    break;

 

  case 163:

 

#line 1622 "awkgram.y"

    {   (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 164:

 

#line 1624 "awkgram.y"

    {

                (yyval) = list_merge((yyvsp[(1) - (2)]), (yyvsp[(2) - (2)]));

 

  case 165:

 

#line 1631 "awkgram.y"

    {

                INSTRUCTION *ip = (yyvsp[(1) - (1)])->lasti; 

 

  case 166:

 

#line 1648 "awkgram.y"

    {

                INSTRUCTION *t = (yyvsp[(2) - (3)]);

 

  case 167:

 

#line 1665 "awkgram.y"

    {   (yyval) = (yyvsp[(1) - (1)]); }

    break;

 

  case 168:

 

#line 1667 "awkgram.y"

    {

                (yyval) = list_merge((yyvsp[(1) - (2)]), (yyvsp[(2) - (2)]));

 

  case 169:

 

#line 1674 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (2)]); }

    break;

 

  case 170:

 

#line 1679 "awkgram.y"

    {

                char *var_name = (yyvsp[(1) - (1)])->lextok;

 

  case 171:

 

#line 1687 "awkgram.y"

    {

                char *arr = (yyvsp[(1) - (2)])->lextok;

 

  case 172:

 

#line 1697 "awkgram.y"

    {

                INSTRUCTION *ip = (yyvsp[(1) - (1)])->nexti;

 

  case 173:

 

#line 1709 "awkgram.y"

    {

                (yyval) = list_append((yyvsp[(2) - (3)]), (yyvsp[(1) - (3)]));

 

  case 174:

 

#line 1718 "awkgram.y"

    {

                (yyvsp[(1) - (1)])->opcode = Op_postincrement;

 

  case 175:

 

#line 1722 "awkgram.y"

    {

                (yyvsp[(1) - (1)])->opcode = Op_postdecrement;

 

  case 176:

 

#line 1725 "awkgram.y"

    { (yyval) = NULL; }

    break;

 

  case 178:

 

#line 1733 "awkgram.y"

    { yyerrok; }

    break;

 

  case 179:

 

#line 1737 "awkgram.y"

    { yyerrok; }

    break;

 

  case 182:

 

#line 1746 "awkgram.y"

    { yyerrok; }

    break;

 

  case 183:

 

#line 1750 "awkgram.y"

    { (yyval) = (yyvsp[(1) - (1)]); yyerrok; }

    break;

 

  case 184:

 

#line 1754 "awkgram.y"

    { yyerrok; }

    break;

 

 

 

#line 4234 "awkgram.c"

      default: break;

    }