close files.
authorBodo Möller <bodo@openssl.org>
Tue, 27 Jul 1999 09:13:49 +0000 (09:13 +0000)
committerBodo Möller <bodo@openssl.org>
Tue, 27 Jul 1999 09:13:49 +0000 (09:13 +0000)
util/mk1mf.pl

index 4647fc7..e4596be 100755 (executable)
@@ -420,9 +420,11 @@ if (open(IN,"crypto/mk1mfinf.h"))
                        $old_mk1mfinf_h .= $_;
                        }
                }
+       close(IN);
 
        open(OUT,">crypto/mk1mfinf.h") || die "Can't open mk1mfinf.h";
        print OUT $old_mk1mfinf_h;
+       close(OUT);
        }
 
 open (OUT,">>crypto/mk1mfinf.h") || die "Can't open mk1mfinf.h";