minor bug fix
This commit is contained in:
parent
f9f1db874f
commit
faa0c191a4
@ -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);
|
||||
}
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user