aboutsummaryrefslogtreecommitdiffstats
path: root/command.c
diff options
context:
space:
mode:
Diffstat (limited to 'command.c')
-rw-r--r--command.c182
1 files changed, 91 insertions, 91 deletions
diff --git a/command.c b/command.c
index bcb8a890..8c840b40 100644
--- a/command.c
+++ b/command.c
@@ -70,7 +70,7 @@
#define yychar zzchar
/* Copy the first part of user declarations. */
-#line 26 "command.y" /* yacc.c:339 */
+#line 27 "command.y" /* yacc.c:339 */
#include "awk.h"
#include "cmd.h"
@@ -583,22 +583,22 @@ static const yytype_uint8 yytranslate[] =
/* YYRLINE[YYN] -- Source line where rule number YYN was defined. */
static const yytype_uint16 yyrline[] =
{
- 0, 106, 106, 108, 126, 127, 177, 184, 185, 186,
- 187, 188, 192, 193, 194, 195, 199, 200, 201, 202,
- 206, 207, 212, 216, 236, 243, 243, 250, 266, 280,
- 281, 282, 283, 284, 285, 291, 303, 304, 305, 305,
- 306, 306, 307, 308, 309, 310, 311, 311, 312, 313,
- 313, 314, 314, 315, 315, 316, 317, 318, 323, 328,
- 354, 364, 369, 381, 381, 389, 403, 416, 417, 423,
- 424, 428, 429, 430, 431, 437, 438, 439, 444, 455,
- 456, 461, 469, 486, 487, 488, 489, 490, 495, 496,
- 496, 497, 498, 498, 499, 504, 505, 510, 511, 516,
- 517, 520, 522, 526, 527, 542, 543, 548, 556, 557,
- 558, 559, 563, 564, 568, 569, 570, 575, 576, 578,
- 585, 586, 587, 588, 589, 590, 594, 607, 608, 609,
- 613, 614, 615, 616, 620, 622, 624, 628, 643, 647,
- 649, 654, 655, 664, 674, 676, 683, 696, 697, 703,
- 704, 709, 715, 724, 726, 728, 736
+ 0, 107, 107, 109, 127, 128, 178, 185, 186, 187,
+ 188, 189, 193, 194, 195, 196, 200, 201, 202, 203,
+ 207, 208, 213, 217, 237, 244, 244, 251, 267, 281,
+ 282, 283, 284, 285, 286, 292, 304, 305, 306, 306,
+ 307, 307, 308, 309, 310, 311, 312, 312, 313, 314,
+ 314, 315, 315, 316, 316, 317, 318, 319, 324, 329,
+ 355, 365, 370, 382, 382, 390, 404, 417, 418, 424,
+ 425, 429, 430, 431, 432, 438, 439, 440, 445, 456,
+ 457, 462, 470, 487, 488, 489, 490, 491, 496, 497,
+ 497, 498, 499, 499, 500, 505, 506, 511, 512, 517,
+ 518, 521, 523, 527, 528, 543, 544, 549, 557, 558,
+ 559, 560, 564, 565, 569, 570, 571, 576, 577, 579,
+ 586, 587, 588, 589, 590, 591, 595, 608, 609, 610,
+ 614, 615, 616, 617, 621, 623, 625, 629, 644, 648,
+ 650, 655, 656, 665, 675, 677, 684, 697, 698, 704,
+ 705, 710, 716, 725, 727, 729, 737
};
#endif
@@ -1527,7 +1527,7 @@ yyreduce:
switch (yyn)
{
case 3:
-#line 109 "command.y" /* yacc.c:1646 */
+#line 110 "command.y" /* yacc.c:1646 */
{
cmd_idx = -1;
want_nodeval = false;
@@ -1546,7 +1546,7 @@ yyreduce:
break;
case 5:
-#line 128 "command.y" /* yacc.c:1646 */
+#line 129 "command.y" /* yacc.c:1646 */
{
if (errcount == 0 && cmd_idx >= 0) {
Func_cmd cmdfunc;
@@ -1600,7 +1600,7 @@ yyreduce:
break;
case 6:
-#line 178 "command.y" /* yacc.c:1646 */
+#line 179 "command.y" /* yacc.c:1646 */
{
yyerrok;
}
@@ -1608,13 +1608,13 @@ yyreduce:
break;
case 22:
-#line 212 "command.y" /* yacc.c:1646 */
+#line 213 "command.y" /* yacc.c:1646 */
{ want_nodeval = true; }
#line 1614 "command.c" /* yacc.c:1646 */
break;
case 23:
-#line 217 "command.y" /* yacc.c:1646 */
+#line 218 "command.y" /* yacc.c:1646 */
{
if (errcount == 0) {
/* don't free arg_list; passed on to statement_list
@@ -1634,7 +1634,7 @@ yyreduce:
break;
case 24:
-#line 236 "command.y" /* yacc.c:1646 */
+#line 237 "command.y" /* yacc.c:1646 */
{
(yyval) = append_statement(arg_list, (char *) start_EVAL);
if (read_a_line == read_commands_string) /* unserializing 'eval' in 'commands' */
@@ -1646,13 +1646,13 @@ yyreduce:
break;
case 25:
-#line 243 "command.y" /* yacc.c:1646 */
+#line 244 "command.y" /* yacc.c:1646 */
{ (yyval) = append_statement((yyvsp[-1]), lexptr_begin); }
#line 1652 "command.c" /* yacc.c:1646 */
break;
case 26:
-#line 244 "command.y" /* yacc.c:1646 */
+#line 245 "command.y" /* yacc.c:1646 */
{
(yyval) = (yyvsp[-1]);
}
@@ -1660,7 +1660,7 @@ yyreduce:
break;
case 27:
-#line 251 "command.y" /* yacc.c:1646 */
+#line 252 "command.y" /* yacc.c:1646 */
{
arg_list = append_statement((yyvsp[-1]), (char *) end_EVAL);
if (read_a_line == read_commands_string) { /* unserializing 'eval' in 'commands' */
@@ -1680,7 +1680,7 @@ yyreduce:
break;
case 28:
-#line 267 "command.y" /* yacc.c:1646 */
+#line 268 "command.y" /* yacc.c:1646 */
{
NODE *n;
CMDARG *arg;
@@ -1695,7 +1695,7 @@ yyreduce:
break;
case 34:
-#line 286 "command.y" /* yacc.c:1646 */
+#line 287 "command.y" /* yacc.c:1646 */
{
if (cmdtab[cmd_idx].class == D_FRAME
&& (yyvsp[0]) != NULL && (yyvsp[0])->a_int < 0)
@@ -1705,7 +1705,7 @@ yyreduce:
break;
case 35:
-#line 292 "command.y" /* yacc.c:1646 */
+#line 293 "command.y" /* yacc.c:1646 */
{
int idx = find_argument((yyvsp[0]));
if (idx < 0)
@@ -1721,43 +1721,43 @@ yyreduce:
break;
case 38:
-#line 305 "command.y" /* yacc.c:1646 */
+#line 306 "command.y" /* yacc.c:1646 */
{ want_nodeval = true; }
#line 1727 "command.c" /* yacc.c:1646 */
break;
case 40:
-#line 306 "command.y" /* yacc.c:1646 */
+#line 307 "command.y" /* yacc.c:1646 */
{ want_nodeval = true; }
#line 1733 "command.c" /* yacc.c:1646 */
break;
case 46:
-#line 311 "command.y" /* yacc.c:1646 */
+#line 312 "command.y" /* yacc.c:1646 */
{ want_nodeval = true; }
#line 1739 "command.c" /* yacc.c:1646 */
break;
case 49:
-#line 313 "command.y" /* yacc.c:1646 */
+#line 314 "command.y" /* yacc.c:1646 */
{ want_nodeval = true; }
#line 1745 "command.c" /* yacc.c:1646 */
break;
case 51:
-#line 314 "command.y" /* yacc.c:1646 */
+#line 315 "command.y" /* yacc.c:1646 */
{ want_nodeval = true; }
#line 1751 "command.c" /* yacc.c:1646 */
break;
case 53:
-#line 315 "command.y" /* yacc.c:1646 */
+#line 316 "command.y" /* yacc.c:1646 */
{ want_nodeval = true; }
#line 1757 "command.c" /* yacc.c:1646 */
break;
case 57:
-#line 319 "command.y" /* yacc.c:1646 */
+#line 320 "command.y" /* yacc.c:1646 */
{
if (in_cmd_src((yyvsp[0])->a_string))
yyerror(_("source \"%s\": already sourced."), (yyvsp[0])->a_string);
@@ -1766,7 +1766,7 @@ yyreduce:
break;
case 58:
-#line 324 "command.y" /* yacc.c:1646 */
+#line 325 "command.y" /* yacc.c:1646 */
{
if (! input_from_tty)
yyerror(_("save \"%s\": command not permitted."), (yyvsp[0])->a_string);
@@ -1775,7 +1775,7 @@ yyreduce:
break;
case 59:
-#line 329 "command.y" /* yacc.c:1646 */
+#line 330 "command.y" /* yacc.c:1646 */
{
int type = 0;
int num;
@@ -1805,7 +1805,7 @@ yyreduce:
break;
case 60:
-#line 355 "command.y" /* yacc.c:1646 */
+#line 356 "command.y" /* yacc.c:1646 */
{
if (! in_commands)
yyerror(_("`end' valid only in command `commands' or `eval'"));
@@ -1819,7 +1819,7 @@ yyreduce:
break;
case 61:
-#line 365 "command.y" /* yacc.c:1646 */
+#line 366 "command.y" /* yacc.c:1646 */
{
if (! in_commands)
yyerror(_("`silent' valid only in command `commands'"));
@@ -1828,7 +1828,7 @@ yyreduce:
break;
case 62:
-#line 370 "command.y" /* yacc.c:1646 */
+#line 371 "command.y" /* yacc.c:1646 */
{
int idx = find_argument((yyvsp[0]));
if (idx < 0)
@@ -1844,13 +1844,13 @@ yyreduce:
break;
case 63:
-#line 381 "command.y" /* yacc.c:1646 */
+#line 382 "command.y" /* yacc.c:1646 */
{ want_nodeval = true; }
#line 1850 "command.c" /* yacc.c:1646 */
break;
case 64:
-#line 382 "command.y" /* yacc.c:1646 */
+#line 383 "command.y" /* yacc.c:1646 */
{
int type;
int num = (yyvsp[-2])->a_int;
@@ -1862,7 +1862,7 @@ yyreduce:
break;
case 65:
-#line 390 "command.y" /* yacc.c:1646 */
+#line 391 "command.y" /* yacc.c:1646 */
{
if (in_commands) {
/* Prepend command 'eval' to argument list */
@@ -1877,7 +1877,7 @@ yyreduce:
break;
case 66:
-#line 404 "command.y" /* yacc.c:1646 */
+#line 405 "command.y" /* yacc.c:1646 */
{
if ((yyvsp[0]) != NULL) {
NODE *n = (yyvsp[0])->a_node;
@@ -1891,37 +1891,37 @@ yyreduce:
break;
case 68:
-#line 418 "command.y" /* yacc.c:1646 */
+#line 419 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 1897 "command.c" /* yacc.c:1646 */
break;
case 69:
-#line 423 "command.y" /* yacc.c:1646 */
+#line 424 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 1903 "command.c" /* yacc.c:1646 */
break;
case 74:
-#line 432 "command.y" /* yacc.c:1646 */
+#line 433 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 1909 "command.c" /* yacc.c:1646 */
break;
case 75:
-#line 437 "command.y" /* yacc.c:1646 */
+#line 438 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 1915 "command.c" /* yacc.c:1646 */
break;
case 77:
-#line 440 "command.y" /* yacc.c:1646 */
+#line 441 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 1921 "command.c" /* yacc.c:1646 */
break;
case 78:
-#line 445 "command.y" /* yacc.c:1646 */
+#line 446 "command.y" /* yacc.c:1646 */
{
NODE *n;
n = (yyvsp[0])->a_node;
@@ -1932,13 +1932,13 @@ yyreduce:
break;
case 79:
-#line 455 "command.y" /* yacc.c:1646 */
+#line 456 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 1938 "command.c" /* yacc.c:1646 */
break;
case 80:
-#line 457 "command.y" /* yacc.c:1646 */
+#line 458 "command.y" /* yacc.c:1646 */
{
if (find_option((yyvsp[0])->a_string) < 0)
yyerror(_("option: invalid parameter - \"%s\""), (yyvsp[0])->a_string);
@@ -1947,7 +1947,7 @@ yyreduce:
break;
case 81:
-#line 462 "command.y" /* yacc.c:1646 */
+#line 463 "command.y" /* yacc.c:1646 */
{
if (find_option((yyvsp[-2])->a_string) < 0)
yyerror(_("option: invalid parameter - \"%s\""), (yyvsp[-2])->a_string);
@@ -1956,7 +1956,7 @@ yyreduce:
break;
case 82:
-#line 470 "command.y" /* yacc.c:1646 */
+#line 471 "command.y" /* yacc.c:1646 */
{
NODE *n;
n = lookup((yyvsp[0])->a_string);
@@ -1973,49 +1973,49 @@ yyreduce:
break;
case 83:
-#line 486 "command.y" /* yacc.c:1646 */
+#line 487 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 1979 "command.c" /* yacc.c:1646 */
break;
case 88:
-#line 495 "command.y" /* yacc.c:1646 */
+#line 496 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 1985 "command.c" /* yacc.c:1646 */
break;
case 89:
-#line 496 "command.y" /* yacc.c:1646 */
+#line 497 "command.y" /* yacc.c:1646 */
{ want_nodeval = true; }
#line 1991 "command.c" /* yacc.c:1646 */
break;
case 92:
-#line 498 "command.y" /* yacc.c:1646 */
+#line 499 "command.y" /* yacc.c:1646 */
{ want_nodeval = true; }
#line 1997 "command.c" /* yacc.c:1646 */
break;
case 95:
-#line 504 "command.y" /* yacc.c:1646 */
+#line 505 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 2003 "command.c" /* yacc.c:1646 */
break;
case 97:
-#line 510 "command.y" /* yacc.c:1646 */
+#line 511 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 2009 "command.c" /* yacc.c:1646 */
break;
case 99:
-#line 516 "command.y" /* yacc.c:1646 */
+#line 517 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 2015 "command.c" /* yacc.c:1646 */
break;
case 104:
-#line 528 "command.y" /* yacc.c:1646 */
+#line 529 "command.y" /* yacc.c:1646 */
{
int idx = find_argument((yyvsp[-1]));
if (idx < 0)
@@ -2031,7 +2031,7 @@ yyreduce:
break;
case 106:
-#line 544 "command.y" /* yacc.c:1646 */
+#line 545 "command.y" /* yacc.c:1646 */
{
(yyvsp[0])->type = D_array; /* dump all items */
(yyvsp[0])->a_count = 0;
@@ -2040,7 +2040,7 @@ yyreduce:
break;
case 107:
-#line 549 "command.y" /* yacc.c:1646 */
+#line 550 "command.y" /* yacc.c:1646 */
{
(yyvsp[-1])->type = D_array;
(yyvsp[-1])->a_count = num_dim;
@@ -2049,19 +2049,19 @@ yyreduce:
break;
case 117:
-#line 575 "command.y" /* yacc.c:1646 */
+#line 576 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 2055 "command.c" /* yacc.c:1646 */
break;
case 118:
-#line 577 "command.y" /* yacc.c:1646 */
+#line 578 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 2061 "command.c" /* yacc.c:1646 */
break;
case 119:
-#line 579 "command.y" /* yacc.c:1646 */
+#line 580 "command.y" /* yacc.c:1646 */
{
CMDARG *a;
a = mk_cmdarg(D_int);
@@ -2072,7 +2072,7 @@ yyreduce:
break;
case 126:
-#line 595 "command.y" /* yacc.c:1646 */
+#line 596 "command.y" /* yacc.c:1646 */
{
if ((yyvsp[-2])->a_int > (yyvsp[0])->a_int)
yyerror(_("invalid range specification: %d - %d"),
@@ -2085,25 +2085,25 @@ yyreduce:
break;
case 127:
-#line 607 "command.y" /* yacc.c:1646 */
+#line 608 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 2091 "command.c" /* yacc.c:1646 */
break;
case 134:
-#line 621 "command.y" /* yacc.c:1646 */
+#line 622 "command.y" /* yacc.c:1646 */
{ (yyval) = (yyvsp[0]); }
#line 2097 "command.c" /* yacc.c:1646 */
break;
case 135:
-#line 623 "command.y" /* yacc.c:1646 */
+#line 624 "command.y" /* yacc.c:1646 */
{ (yyval) = (yyvsp[-2]); }
#line 2103 "command.c" /* yacc.c:1646 */
break;
case 137:
-#line 629 "command.y" /* yacc.c:1646 */
+#line 630 "command.y" /* yacc.c:1646 */
{
CMDARG *a;
NODE *subs;
@@ -2122,19 +2122,19 @@ yyreduce:
break;
case 139:
-#line 648 "command.y" /* yacc.c:1646 */
+#line 649 "command.y" /* yacc.c:1646 */
{ (yyval) = (yyvsp[0]); num_dim = 1; }
#line 2128 "command.c" /* yacc.c:1646 */
break;
case 140:
-#line 650 "command.y" /* yacc.c:1646 */
+#line 651 "command.y" /* yacc.c:1646 */
{ (yyval) = (yyvsp[-1]); num_dim++; }
#line 2134 "command.c" /* yacc.c:1646 */
break;
case 142:
-#line 656 "command.y" /* yacc.c:1646 */
+#line 657 "command.y" /* yacc.c:1646 */
{
NODE *n = (yyvsp[0])->a_node;
if ((n->flags & NUMBER) == 0)
@@ -2147,7 +2147,7 @@ yyreduce:
break;
case 143:
-#line 665 "command.y" /* yacc.c:1646 */
+#line 666 "command.y" /* yacc.c:1646 */
{
/* a_string is array name, a_count is dimension count */
(yyvsp[-1])->type = D_subscript;
@@ -2158,13 +2158,13 @@ yyreduce:
break;
case 144:
-#line 675 "command.y" /* yacc.c:1646 */
+#line 676 "command.y" /* yacc.c:1646 */
{ (yyval) = (yyvsp[0]); }
#line 2164 "command.c" /* yacc.c:1646 */
break;
case 145:
-#line 677 "command.y" /* yacc.c:1646 */
+#line 678 "command.y" /* yacc.c:1646 */
{
NODE *n = (yyvsp[0])->a_node;
if ((n->flags & NUMBER) == 0)
@@ -2175,7 +2175,7 @@ yyreduce:
break;
case 146:
-#line 684 "command.y" /* yacc.c:1646 */
+#line 685 "command.y" /* yacc.c:1646 */
{
NODE *n = (yyvsp[0])->a_node;
if ((n->flags & NUMBER) == 0)
@@ -2188,31 +2188,31 @@ yyreduce:
break;
case 147:
-#line 696 "command.y" /* yacc.c:1646 */
+#line 697 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 2194 "command.c" /* yacc.c:1646 */
break;
case 148:
-#line 698 "command.y" /* yacc.c:1646 */
+#line 699 "command.y" /* yacc.c:1646 */
{ (yyval) = (yyvsp[0]); }
#line 2200 "command.c" /* yacc.c:1646 */
break;
case 149:
-#line 703 "command.y" /* yacc.c:1646 */
+#line 704 "command.y" /* yacc.c:1646 */
{ (yyval) = NULL; }
#line 2206 "command.c" /* yacc.c:1646 */
break;
case 150:
-#line 705 "command.y" /* yacc.c:1646 */
+#line 706 "command.y" /* yacc.c:1646 */
{ (yyval) = (yyvsp[0]); }
#line 2212 "command.c" /* yacc.c:1646 */
break;
case 151:
-#line 710 "command.y" /* yacc.c:1646 */
+#line 711 "command.y" /* yacc.c:1646 */
{
if ((yyvsp[0])->a_int == 0)
yyerror(_("non-zero integer value"));
@@ -2222,7 +2222,7 @@ yyreduce:
break;
case 152:
-#line 716 "command.y" /* yacc.c:1646 */
+#line 717 "command.y" /* yacc.c:1646 */
{
if ((yyvsp[0])->a_int == 0)
yyerror(_("non-zero integer value"));
@@ -2232,19 +2232,19 @@ yyreduce:
break;
case 153:
-#line 725 "command.y" /* yacc.c:1646 */
+#line 726 "command.y" /* yacc.c:1646 */
{ (yyval) = (yyvsp[0]); }
#line 2238 "command.c" /* yacc.c:1646 */
break;
case 154:
-#line 727 "command.y" /* yacc.c:1646 */
+#line 728 "command.y" /* yacc.c:1646 */
{ (yyval) = (yyvsp[0]); }
#line 2244 "command.c" /* yacc.c:1646 */
break;
case 155:
-#line 729 "command.y" /* yacc.c:1646 */
+#line 730 "command.y" /* yacc.c:1646 */
{
(yyvsp[0])->a_int = - (yyvsp[0])->a_int;
(yyval) = (yyvsp[0]);
@@ -2253,7 +2253,7 @@ yyreduce:
break;
case 156:
-#line 737 "command.y" /* yacc.c:1646 */
+#line 738 "command.y" /* yacc.c:1646 */
{
if (lexptr_begin != NULL) {
if (input_from_tty && lexptr_begin[0] != '\0')
@@ -2494,7 +2494,7 @@ yyreturn:
#endif
return yyresult;
}
-#line 747 "command.y" /* yacc.c:1906 */
+#line 748 "command.y" /* yacc.c:1906 */
generated by cgit v1.2.3 (git 2.25.1) at 2025-05-05 06:17:09 +0000