remove temporary

diff --git a/lang/basic/src.old/util.c b/lang/basic/src.old/util.c
index 3a1d2ac..2905abd 100644 (file)
--- a/lang/basic/src.old/util.c
+++ b/lang/basic/src.old/util.c
@@ -32,6 +32,7 @@ fatal(str)
 char *str;
 {
        Xerror("FATAL",str);
+       unlink(tmpfname);
        exit(-1);
 }
 notyetimpl()