diff options
| -rw-r--r-- | rts/linker/LoadArchive.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/linker/LoadArchive.c b/rts/linker/LoadArchive.c index 265afd319c..a2641e83ad 100644 --- a/rts/linker/LoadArchive.c +++ b/rts/linker/LoadArchive.c @@ -645,10 +645,10 @@ bool isArchive (pathchar *path) } size_t ret = fread(buffer, 1, sizeof(buffer), f); + fclose(f); if (ret < sizeof(buffer)) { return false; } - fclose(f); return strncmp(ARCHIVE_HEADER, buffer, sizeof(ARCHIVE_HEADER)-1) == 0; } |