godzil/ack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Prevent double fclose

Browse Source
This commit is contained in:
ceriel 2002-08-26 14:27:15 +00:00
parent 4556d261d8
commit ee2c7069e4
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
util/LLgen/src/main.c
View File

@ -184,7 +184,6 @@ main(argc,argv) register string argv[]; {
setinit(ntneeded); setinit(ntneeded);
maxnt = &nonterms[nnonterms]; maxnt = &nonterms[nnonterms];
maxt = &tokens[ntokens]; maxt = &tokens[ntokens];
fclose(fact);
/* /*
* Now, the grammar is read. Do some computations * Now, the grammar is read. Do some computations
*/ */
@ -198,6 +197,7 @@ main(argc,argv) register string argv[]; {
stderr); stderr);
} }
else gencode(argc); else gencode(argc);
fclose(fact);
UNLINK(f_temp); UNLINK(f_temp);
UNLINK(f_pars); UNLINK(f_pars);
if (verbose) { if (verbose) {