kc3-lang/libtommath

diff --git a/etc/2kprime.c b/etc/2kprime.c
index ad28430..f3f6b74 100644
--- a/etc/2kprime.c
+++ b/etc/2kprime.c
@@ -72,6 +72,7 @@ top:
       fprintf(out, "%d-bits (k = %lu) = %s\n", sizes[x], z, buf);
       fflush(out);
    }
+   fclose(out);
 
    return 0;
 }