minor bug fix

diff --git a/util/ncgg/output.c b/util/ncgg/output.c
index 978f095..0175fb1 100644 (file)
--- a/util/ncgg/output.c
+++ b/util/ncgg/output.c
@@ -69,7 +69,7 @@ opnfile(f,s) FILE **f; char *s; {
 
 unlfile(f,s) FILE *f; char *s; {
 
-       fclose(f);
+       if (f) fclose(f);
        if (unlink(s)<0)
                error("%s incorrect, must be removed!!",s);
 }