tests: close files in glr-regression

* tests/glr-regression.at: Here.
This commit is contained in:
Theophile Ranquet
2012-11-12 15:41:52 +00:00
committed by Akim Demaille
parent be3517b007
commit 05c93b7d84

View File

@@ -196,8 +196,12 @@ int
main (int argc, char **argv)
{
input = stdin;
if (argc == 2 && !(input = fopen (argv[1], "r"))) return 3;
return yyparse ();
if (argc == 2 && !(input = fopen (argv[1], "r")))
return 3;
int res = yyparse ();
if (argc == 2 && fclose (input))
return 4;
return res;
}
]])
AT_BISON_OPTION_POPDEFS
@@ -324,8 +328,12 @@ int
main(int argc, char* argv[])
{
input = stdin;
if (argc == 2 && !(input = fopen (argv[1], "r"))) return 3;
return yyparse ();
if (argc == 2 && !(input = fopen (argv[1], "r")))
return 3;
int res = yyparse ();
if (argc == 2 && fclose (input))
return 4;
return res;
}
]])
AT_BISON_OPTION_POPDEFS