From: ceriel <none@none>
Date: Mon, 23 Feb 1987 09:18:41 +0000 (+0000)
Subject: Delete temporary
X-Git-Tag: release-5-5~4653
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=2d34e6f8394582b23f70d027ac7c0f3e8d2e97f4;p=ack.git

Delete temporary
---

diff --git a/lang/basic/src.old/bem.c b/lang/basic/src.old/bem.c
index c91d60675..9a818c654 100644
--- a/lang/basic/src.old/bem.c
+++ b/lang/basic/src.old/bem.c
@@ -39,7 +39,10 @@ char **argv;
 	/* compile source programs */
 	compileprogram(program);
 	linewarnings();
-	if( errorcnt) exit(-1);
+	if( errorcnt) {
+		unlink(tmpfname);
+		exit(-1);
+	}
 	/* process em object files */
 	simpleprogram();
 }