From: ceriel <none@none>
Date: Wed, 11 Sep 2002 13:32:57 +0000 (+0000)
Subject: Fix
X-Git-Tag: release-5-5~2
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=8f69a0ca44a52094852820a168065ba6ebedeccf;p=ack.git

Fix
---

diff --git a/util/LLgen/src/main.c b/util/LLgen/src/main.c
index 1334509a8..82b88d3aa 100644
--- a/util/LLgen/src/main.c
+++ b/util/LLgen/src/main.c
@@ -192,12 +192,12 @@ main(argc,argv) register string	argv[]; {
 	do_compute();
 	conflchecks();
 	if (nerrors) comfatal();
+	fclose(fact);
 	if (argc-- == 1) {
 		fputs("No code generation for input from standard input\n",
 		      stderr);
 	}
 	else	gencode(argc);
-	fclose(fact);
 	UNLINK(f_temp);
 	UNLINK(f_pars);
 	if (verbose) {