From 00f128894035da3d592f7d894be5dfd033106f98 Mon Sep 17 00:00:00 2001
From: Bill Currie <bill@taniwha.org>
Date: Wed, 13 Jun 2001 22:56:20 +0000
Subject: [PATCH] don't delete processed files if --keep is given

---
 tools/qfpreqcc/qfpreqcc | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

diff --git a/tools/qfpreqcc/qfpreqcc b/tools/qfpreqcc/qfpreqcc
index 089b7f7fa..6febbc272 100755
--- a/tools/qfpreqcc/qfpreqcc
+++ b/tools/qfpreqcc/qfpreqcc
@@ -195,11 +195,20 @@ f.write (progs_dat + '\n\n')
 for l in qcc_list:
 	f.write(l + '\n')
 f.close ()
+no_delete = 0
+i = 0
+while i < len (sys.argv):
+	if sys.argv[i] == '--keep':
+		no_delete = 1
+		del sys.argv[i]
+		continue
+	i = i + 1
 args = ["qfcc"] + sys.argv[1:]
 if not os.fork():
 	os.execvp ("qfcc", args)
 else:
 	os.wait()
-for l in qcc_list:
-	os.unlink (l)
-os.unlink (progs_src)
+if not no_delete:
+	for l in qcc_list:
+		os.unlink (l)
+	os.unlink (progs_src)