From 435edfa24ee016c73c7070a4e54e32d913cf6d67 Mon Sep 17 00:00:00 2001
From: ceriel <devnull@localhost>
Date: Sun, 22 Feb 1987 15:56:31 +0000
Subject: [PATCH] remove temporary

---
 lang/basic/src.old/util.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lang/basic/src.old/util.c b/lang/basic/src.old/util.c
index 3a1d2acc..2905abd4 100644
--- 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()