[Tinycc-devel] win32: tiny_libmaker leaves temporary files on error

[Timo VJ Lähde]

win32/tools/tiny_libmaker leaves temporary files on error

-----------------------------------------------------------------

--- a/tiny_libmaker.c Mon Mar 15 23:51:00 2010
+++ b/tiny_libmaker.c Wed Mar 31 22:35:06 2010
@@ -99,6 +99,7 @@
    if ((fh = fopen(afile, "wb")) == NULL)
    {
        fprintf(stderr, "Can't open file %s \n", afile);
+        fclose(fo);
        remove(tfile);
        return 2;
    }
@@ -117,6 +118,7 @@
        if ((fi = fopen(argv[iarg], "rb")) == NULL)
        {
            fprintf(stderr, "Can't open file %s \n", argv[iarg]);
+            fclose(fo);
            remove(tfile);
            return 2;
        }
@@ -133,6 +135,7 @@
        if (ehdr->e_ident[4] != TCC_ELFCLASS)
        {
            fprintf(stderr, "Unsupported Elf Class: %s\n", argv[iarg]);
+            fclose(fo);
            remove(tfile);
            return 2;
        }
-----------------------------------------------------------------