X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/55f48c48314bf63e224f5cbfad7f9c52b6d78df7..975bdced50287ed8b93aa7c698ab46e2e1f98121:/tests/named-refs.at diff --git a/tests/named-refs.at b/tests/named-refs.at index c9b91a0e..75e73030 100644 --- a/tests/named-refs.at +++ b/tests/named-refs.at @@ -46,21 +46,21 @@ static int power (int base, int exponent); %token NUM "number" %type exp -%nonassoc '=' /* comparison */ +%nonassoc '=' /* comparison */ %left '-' '+' %left '*' '/' -%left NEG /* negation--unary minus */ +%precedence NEG /* negation--unary minus */ %right '^' /* exponentiation */ %% input: line -| input line { } +| input line {} ; line: '\n' -| exp '\n' { } +| exp '\n' {} ; exp: @@ -72,12 +72,12 @@ exp: $$ = $l; } | exp[x] '+' { $$ = $x; } [l] exp[r] { $$ = $l + $r; } -| exp[l] '-' exp[r] { $$ = $l - $r; } -| exp[l] '*' exp[r] { $$ = $l * $r; } +| exp[l] '-' exp[r] { $$ = $l - $r; } +| exp[l] '*' exp[r] { $$ = $l * $r; } | exp[l] '/' exp[r] { $$ = $l / $r; } | '-' exp %prec NEG { $$ = -$2; } -| exp[l] '^' exp[r] { $$ = power ($l, $r); } -| '(' exp[e] ')' { $$ = $e; } +| exp[l] '^' exp[r] { $$ = power ($l, $r); } +| '(' exp[e] ')' { $$ = $e; } | '(' error ')' { $$ = 1111; yyerrok; } | '!' { $$ = 0; YYERROR; } | '-' error { $$ = 0; YYERROR; } @@ -162,10 +162,8 @@ int main (int argc, const char **argv) } status = yyparse (); fclose (input); - if (global_result != result) - abort (); - if (global_count != count) - abort (); + assert (global_result == result); + assert (global_count == count); return status; } ]]) @@ -213,21 +211,21 @@ static int power (int base, int exponent); %token NUM "number" %type exp -%nonassoc '=' /* comparison */ +%nonassoc '=' /* comparison */ %left '-' '+' %left '*' '/' -%left NEG /* negation--unary minus */ +%precedence NEG /* negation--unary minus */ %right '^' /* exponentiation */ %% input: line -| input line { } +| input line {} ; line: '\n' -| exp '\n' { } +| exp '\n' {} ; exp: @@ -243,7 +241,7 @@ exp: | exp[x] '*' { $$ = $x; } [l] exp[r] { $$ = $l * $r; } | exp[l] '/' exp[r] { $$ = $l / $r; } | '-' exp %prec NEG { $$ = -$2; } -| exp[l] '^' exp[r] { $$ = power ($l, $r12); } +| exp[l] '^' exp[r] { $$ = power ($l, $r12); } | '(' exp ')' { $$ = $expo; } | '(' error ')' { $$ = 1111; yyerrok; } | '!' { $$ = 0; YYERROR; } @@ -253,16 +251,16 @@ exp: ]]) AT_BISON_CHECK([-o test.c test.y], 1, [], -[[test.y:50.51-60: invalid reference: '$lo9' +[[test.y:50.51-60: error: invalid reference: '$lo9' test.y:50.3-68: symbol not found in production: lo9 -test.y:51.51-60: warning: misleading reference: '$exp' -test.y:42.1-3: warning: refers to: $exp at $$ -test.y:51.7: warning: possibly meant: $x, hiding $exp at $1 -test.y:51.41: warning: possibly meant: $r, hiding $exp at $4 -test.y:52.51-52: $l of 'exp' has no declared type -test.y:55.46-49: invalid reference: '$r12' -test.y:55.3-53: symbol not found in production: r12 -test.y:56.29-33: invalid reference: '$expo' +test.y:51.51-60: warning: misleading reference: '$exp' [-Wother] +test.y:42.1-3: refers to: $exp at $$ +test.y:51.7: possibly meant: $x, hiding $exp at $1 +test.y:51.41: possibly meant: $r, hiding $exp at $4 +test.y:52.51-52: error: $l of 'exp' has no declared type +test.y:55.40-43: error: invalid reference: '$r12' +test.y:55.3-47: symbol not found in production: r12 +test.y:56.29-33: error: invalid reference: '$expo' test.y:56.3-46: symbol not found in production: expo ]]) AT_BISON_OPTION_POPDEFS @@ -279,9 +277,9 @@ foo: '1' foo.bar: '2' ]]) AT_BISON_CHECK([-o test.c test.y], 0, [], -[[test.y:11.22-29: warning: misleading reference: '$foo.bar' -test.y:11.8-10: warning: refers to: $foo at $1 -test.y:11.12-18: warning: possibly meant: $[foo.bar] at $2 +[[test.y:11.22-29: warning: misleading reference: '$foo.bar' [-Wother] +test.y:11.8-10: refers to: $foo at $1 +test.y:11.12-18: possibly meant: $[foo.bar] at $2 ]]) AT_CLEANUP @@ -355,46 +353,167 @@ factor: '(' expr ')' { $$ = $2; } ; ]]) AT_BISON_CHECK([-o test.c test.y], 1, [], -[[test.y:24.36-41: invalid reference: '$cond1' +[[test.y:24.36-41: error: invalid reference: '$cond1' test.y:23.11-24.62: symbol not found in production: cond1 -test.y:26.43-53: invalid reference: '$stmt.field' +test.y:26.43-53: error: invalid reference: '$stmt.field' test.y:25.11-26.60: symbol not found in production: stmt test.y:25.35-38: possibly meant: $then.field, hiding $stmt.field at $4 -test.y:28.43-52: invalid reference: '$stmt.list' +test.y:28.43-52: error: invalid reference: '$stmt.list' test.y:27.11-28.59: symbol not found in production: stmt test.y:27.30-38: possibly meant: $[stmt.list] at $4 -test.y:30.43-46: ambiguous reference: '$xyz' +test.y:30.43-46: error: ambiguous reference: '$xyz' test.y:29.35-37: refers to: $xyz at $4 test.y:29.50-52: refers to: $xyz at $6 -test.y:32.43-52: invalid reference: '$stmt.list' +test.y:32.43-52: error: invalid reference: '$stmt.list' test.y:31.11-32.63: symbol not found in production: stmt test.y:31.40-43: possibly meant: $then, hiding $[stmt.list] at $4 test.y:31.61-64: possibly meant: $else, hiding $[stmt.list] at $6 -test.y:34.43-58: invalid reference: '$stmt.list.field' +test.y:34.43-58: error: invalid reference: '$stmt.list.field' test.y:33.11-34.69: symbol not found in production: stmt test.y:33.40-43: possibly meant: $then.field, hiding $[stmt.list].field at $4 test.y:33.61-64: possibly meant: $else.field, hiding $[stmt.list].field at $6 -test.y:36.43-54: invalid reference: '$[stmt.list]' +test.y:36.43-54: error: invalid reference: '$[stmt.list]' test.y:35.11-36.71: symbol not found in production: stmt.list test.y:35.40-43: possibly meant: $then, hiding $[stmt.list] at $4 test.y:35.61-64: possibly meant: $else, hiding $[stmt.list] at $6 -test.y:38.43-49: invalid reference: '$then.1' +test.y:38.43-49: error: invalid reference: '$then.1' test.y:37.11-38.60: symbol not found in production: then test.y:37.40-45: possibly meant: $[then.1] at $4 -test.y:40.43-55: invalid reference: '$then.1.field' +test.y:40.43-55: error: invalid reference: '$then.1.field' test.y:39.11-40.66: symbol not found in production: then test.y:39.40-45: possibly meant: $[then.1].field at $4 -test.y:42.44-50: invalid reference: '$stmt.x' +test.y:42.44-50: error: invalid reference: '$stmt.x' test.y:41.12-42.57: symbol not found in production: stmt test.y:41.36-41: possibly meant: $[stmt.x].x, hiding $stmt.x at $4 test.y:41.36-41: possibly meant: $[stmt.x] at $4 -test.y:44.13-22: invalid reference: '$if-stmt-a' +test.y:44.13-22: error: invalid reference: '$if-stmt-a' test.y:43.12-44.59: symbol not found in production: if test.y:43.1-9: possibly meant: $[if-stmt-a] at $$ -test.y:46.46-54: invalid reference: '$then-a.f' +test.y:46.46-54: error: invalid reference: '$then-a.f' test.y:45.12-46.65: symbol not found in production: then test.y:45.41-46: possibly meant: $[then-a].f at $4 ]]) + +AT_BISON_CHECK([-fcaret -o test.c test.y], 1, [], +[[test.y:24.36-41: error: invalid reference: '$cond1' + { $if_stmt1 = new IfStmt($cond1, $then.f1, $else); }; + ^^^^^^ +test.y:23.11-24.62: symbol not found in production: cond1 + if_stmt1: IF expr[cond] THEN stmt[then] ELSE stmt.list[else] FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:26.43-53: error: invalid reference: '$stmt.field' + { $if_stmt2 = new IfStmt($cond, $stmt.field, 0); }; + ^^^^^^^^^^^ +test.y:25.11-26.60: symbol not found in production: stmt + if_stmt2: IF expr[cond] THEN stmt[then] FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:25.35-38: possibly meant: $then.field, hiding $stmt.field at $4 + if_stmt2: IF expr[cond] THEN stmt[then] FI + ^^^^ +test.y:28.43-52: error: invalid reference: '$stmt.list' + { $if_stmt3 = new IfStmt($cond, $stmt.list, 0); }; + ^^^^^^^^^^ +test.y:27.11-28.59: symbol not found in production: stmt + if_stmt3: IF expr[cond] THEN stmt.list FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:27.30-38: possibly meant: $[stmt.list] at $4 + if_stmt3: IF expr[cond] THEN stmt.list FI + ^^^^^^^^^ +test.y:30.43-46: error: ambiguous reference: '$xyz' + { $if_stmt4 = new IfStmt($cond, $xyz, $cond); }; + ^^^^ +test.y:29.35-37: refers to: $xyz at $4 + if_stmt4: IF expr[cond] THEN stmt[xyz] ELSE stmt[xyz] FI + ^^^ +test.y:29.50-52: refers to: $xyz at $6 + if_stmt4: IF expr[cond] THEN stmt[xyz] ELSE stmt[xyz] FI + ^^^ +test.y:32.43-52: error: invalid reference: '$stmt.list' + { $if_stmt5 = new IfStmt($cond, $stmt.list, $else); }; + ^^^^^^^^^^ +test.y:31.11-32.63: symbol not found in production: stmt + if_stmt5: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:31.40-43: possibly meant: $then, hiding $[stmt.list] at $4 + if_stmt5: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^ +test.y:31.61-64: possibly meant: $else, hiding $[stmt.list] at $6 + if_stmt5: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^ +test.y:34.43-58: error: invalid reference: '$stmt.list.field' + { $if_stmt6 = new IfStmt($cond, $stmt.list.field, $else); }; + ^^^^^^^^^^^^^^^^ +test.y:33.11-34.69: symbol not found in production: stmt + if_stmt6: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:33.40-43: possibly meant: $then.field, hiding $[stmt.list].field at $4 + if_stmt6: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^ +test.y:33.61-64: possibly meant: $else.field, hiding $[stmt.list].field at $6 + if_stmt6: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^ +test.y:36.43-54: error: invalid reference: '$[stmt.list]' + { $if_stmt7 = new IfStmt($cond, $[stmt.list].field, $else); }; + ^^^^^^^^^^^^ +test.y:35.11-36.71: symbol not found in production: stmt.list + if_stmt7: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:35.40-43: possibly meant: $then, hiding $[stmt.list] at $4 + if_stmt7: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^ +test.y:35.61-64: possibly meant: $else, hiding $[stmt.list] at $6 + if_stmt7: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^ +test.y:38.43-49: error: invalid reference: '$then.1' + { $if_stmt8 = new IfStmt($cond, $then.1, $else); }; + ^^^^^^^ +test.y:37.11-38.60: symbol not found in production: then + if_stmt8: IF expr[cond] THEN stmt.list[then.1] ELSE stmt.list[else] FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:37.40-45: possibly meant: $[then.1] at $4 + if_stmt8: IF expr[cond] THEN stmt.list[then.1] ELSE stmt.list[else] FI + ^^^^^^ +test.y:40.43-55: error: invalid reference: '$then.1.field' + { $if_stmt9 = new IfStmt($cond, $then.1.field, $else); }; + ^^^^^^^^^^^^^ +test.y:39.11-40.66: symbol not found in production: then + if_stmt9: IF expr[cond] THEN stmt.list[then.1] ELSE stmt.list[else] FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:39.40-45: possibly meant: $[then.1].field at $4 + if_stmt9: IF expr[cond] THEN stmt.list[then.1] ELSE stmt.list[else] FI + ^^^^^^ +test.y:42.44-50: error: invalid reference: '$stmt.x' + { $if_stmt10 = new IfStmt($cond, $stmt.x, 0); }; + ^^^^^^^ +test.y:41.12-42.57: symbol not found in production: stmt + if_stmt10: IF expr[cond] THEN stmt[stmt.x] FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:41.36-41: possibly meant: $[stmt.x].x, hiding $stmt.x at $4 + if_stmt10: IF expr[cond] THEN stmt[stmt.x] FI + ^^^^^^ +test.y:41.36-41: possibly meant: $[stmt.x] at $4 + if_stmt10: IF expr[cond] THEN stmt[stmt.x] FI + ^^^^^^ +test.y:44.13-22: error: invalid reference: '$if-stmt-a' + { $if-stmt-a = new IfStmt($cond, $then, $else); }; + ^^^^^^^^^^ +test.y:43.12-44.59: symbol not found in production: if + if-stmt-a: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:43.1-9: possibly meant: $[if-stmt-a] at $$ + if-stmt-a: IF expr[cond] THEN stmt.list[then] ELSE stmt.list[else] FI + ^^^^^^^^^ +test.y:46.46-54: error: invalid reference: '$then-a.f' + { $[if-stmt-b] = new IfStmt($cond, $then-a.f, $else); }; + ^^^^^^^^^ +test.y:45.12-46.65: symbol not found in production: then + if-stmt-b: IF expr[cond] THEN if-stmt-a[then-a] ELSE stmt.list[else] FI + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +test.y:45.41-46: possibly meant: $[then-a].f at $4 + if-stmt-b: IF expr[cond] THEN if-stmt-a[then-a] ELSE stmt.list[else] FI + ^^^^^^ +]]) + AT_CLEANUP ####################################################################### @@ -407,7 +526,7 @@ start: foo[] bar { s = $foo; } ]]) AT_BISON_CHECK([-o test.c test.y], 1, [], -[[test.y:11.12: an identifier expected +[[test.y:11.12: error: an identifier expected ]]) AT_CLEANUP @@ -421,7 +540,7 @@ start: foo[ a d ] bar { s = $foo; } ]]) AT_BISON_CHECK([-o test.c test.y], 1, [], -[[test.y:11.15: unexpected identifier in bracketed name: 'd' +[[test.y:11.15: error: unexpected identifier in bracketed name: 'd' ]]) AT_CLEANUP @@ -435,7 +554,7 @@ start: foo[/* comment */] bar { s = $foo; } ]]) AT_BISON_CHECK([-o test.c test.y], 1, [], -[[test.y:11.25: an identifier expected +[[test.y:11.25: error: an identifier expected ]]) AT_CLEANUP @@ -445,14 +564,14 @@ AT_SETUP([Stray symbols in brackets]) AT_DATA_GRAMMAR([test.y], [[ %% -start: foo[ /* aaa */ *&-.+ ] bar +start: foo[ % /* aaa */ *&-.+\000\001\002\377 ] bar { s = $foo; } ]]) +AT_CHECK([[$PERL -pi -e 's/\\(\d{3})/chr(oct($1))/ge' test.y || exit 77]]) AT_BISON_CHECK([-o test.c test.y], 1, [], -[[test.y:11.23: invalid character in bracketed name: '*' -test.y:11.24: invalid character in bracketed name: '&' -test.y:11.25: invalid character in bracketed name: '-' -test.y:11.27: invalid character in bracketed name: '+' +[[test.y:11.13: error: invalid character in bracketed name: '%' +test.y:11.25-27: error: invalid characters in bracketed name: '*&-' +test.y:11.29-30: error: invalid characters in bracketed name: '+\0\001\002\377' ]]) AT_CLEANUP @@ -465,7 +584,7 @@ AT_DATA_GRAMMAR([test.y], start[a s]: foo; ]]) AT_BISON_CHECK([-o test.c test.y], 1, [], -[[test.y:11.9: unexpected identifier in bracketed name: 's' +[[test.y:11.9: error: unexpected identifier in bracketed name: 's' ]]) AT_CLEANUP @@ -512,37 +631,37 @@ sym_a: 'a'; sym_b: 'b'; ]]) AT_BISON_CHECK([-o test.c test.y], 1, [], -[[test.y:12.22-31: invalid reference: '$sym.field' +[[test.y:12.22-31: error: invalid reference: '$sym.field' test.y:12.3-35: symbol not found in production: sym -test.y:13.22-35: invalid reference: '$sym.field' +test.y:13.22-35: error: invalid reference: '$sym.field' test.y:13.3-39: symbol not found in production: sym -test.y:14.22-33: invalid reference: '$[sym.field]' +test.y:14.22-33: error: invalid reference: '$[sym.field]' test.y:14.3-37: symbol not found in production: sym.field -test.y:15.22-37: invalid reference: '$[sym.field]' +test.y:15.22-37: error: invalid reference: '$[sym.field]' test.y:15.3-41: symbol not found in production: sym.field -test.y:16.22-25: invalid reference: '$sym' +test.y:16.22-25: error: invalid reference: '$sym' test.y:16.3-29: symbol not found in production: sym -test.y:17.22-29: invalid reference: '$sym' +test.y:17.22-29: error: invalid reference: '$sym' test.y:17.3-33: symbol not found in production: sym -test.y:18.22-27: invalid reference: '$[sym]' +test.y:18.22-27: error: invalid reference: '$[sym]' test.y:18.3-65: symbol not found in production before $3: sym -test.y:18.52-61: invalid reference: '$[sym]' +test.y:18.52-61: error: invalid reference: '$[sym]' test.y:18.3-65: symbol not found in production: sym -test.y:22.22-31: invalid reference: '$sym-field' +test.y:22.22-31: error: invalid reference: '$sym-field' test.y:22.3-35: symbol not found in production: sym -test.y:23.22-35: invalid reference: '$sym-field' +test.y:23.22-35: error: invalid reference: '$sym-field' test.y:23.3-39: symbol not found in production: sym -test.y:24.22-33: invalid reference: '$[sym-field]' +test.y:24.22-33: error: invalid reference: '$[sym-field]' test.y:24.3-37: symbol not found in production: sym-field -test.y:25.22-37: invalid reference: '$[sym-field]' +test.y:25.22-37: error: invalid reference: '$[sym-field]' test.y:25.3-41: symbol not found in production: sym-field -test.y:26.22-25: invalid reference: '$sym' +test.y:26.22-25: error: invalid reference: '$sym' test.y:26.3-29: symbol not found in production: sym -test.y:27.22-29: invalid reference: '$sym' +test.y:27.22-29: error: invalid reference: '$sym' test.y:27.3-33: symbol not found in production: sym -test.y:28.22-27: invalid reference: '$[sym]' +test.y:28.22-27: error: invalid reference: '$[sym]' test.y:28.3-65: symbol not found in production before $3: sym -test.y:28.52-61: invalid reference: '$[sym]' +test.y:28.52-61: error: invalid reference: '$[sym]' test.y:28.3-65: symbol not found in production: sym ]]) AT_CLEANUP @@ -560,10 +679,10 @@ start: .field: ; ]]) AT_BISON_CHECK([[test.y]], [[1]], [], -[[test.y:4.12-18: invalid reference: '$.field' +[[test.y:4.12-18: error: invalid reference: '$.field' test.y:4.13: syntax error after '$', expecting integer, letter, '_', '@<:@', or '$' test.y:4.3-8: possibly meant: $[.field] at $1 -test.y:5.12-18: invalid reference: '@.field' +test.y:5.12-18: error: invalid reference: '@.field' test.y:5.13: syntax error after '@', expecting integer, letter, '_', '@<:@', or '$' ]]) AT_DATA([[test.y]], @@ -575,7 +694,7 @@ start: ; ]]) AT_BISON_CHECK([[test.y]], [[0]], [], -[[test.y:4.9: warning: stray '$' -test.y:5.9: warning: stray '@' +[[test.y:4.9: warning: stray '$' [-Wother] +test.y:5.9: warning: stray '@' [-Wother] ]]) AT_CLEANUP