From: ceriel <none@none>
Date: Thu, 14 Apr 1988 16:09:02 +0000 (+0000)
Subject: only fclose on non-NULL streams
X-Git-Tag: release-5-5~3435
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=f92dad2d9d7dd12930078a03a0b84af607cccbd3;p=ack.git

only fclose on non-NULL streams
---

diff --git a/mach/proto/ncg/gencode.c b/mach/proto/ncg/gencode.c
index c103c8844..c33f492ec 100644
--- a/mach/proto/ncg/gencode.c
+++ b/mach/proto/ncg/gencode.c
@@ -52,7 +52,7 @@ out_finish() {
 		fflush(stderr);
 	else
 #endif
-		fclose(codefile);
+		if (codefile) fclose(codefile);
 #ifdef TABLEDEBUG
 	termlset();
 #endif