Bug#22047: diff -u patch for #22047

["H. S. Teoh" <hsteoh@quickfur.ath.cx>]

tags 22047 + patch
thanks

Hi, attached with this mail is a patch that adds the grimreaper proc to
cbb, as suggested by Chris Waters. Note that this has not been tested; it
is just based on my reading of the Tcl code. Somebody should try it out to
make sure it works before uploading cbb.  Also, it might be a good idea to
forward this upstream as well. 


T

-- 
"640K ought to be enough" -- Bill G., 1984. "The Internet is not a primary
goal for PC usage" -- Bill G., 1995. "Linux has no impact on Microsoft's
strategy" -- Bill G., 1999.

--- cbb-0.8.1.ORIG/init.tcl	2000-01-04 18:01:19.000000000 -0500
+++ cbb-0.8.1/init.tcl	2002-12-11 10:43:19.000000000 -0500
@@ -49,6 +49,16 @@
 
 
 # ----------------------------------------------------------------------------
+# Workaround to make the Tcl interpreter reap zombie child processes
+# ----------------------------------------------------------------------------
+
+proc grimreaper {
+    catch { exec "" }
+    after 3000 grimreaper
+}
+
+
+# ----------------------------------------------------------------------------
 # Initialize CBB
 # ----------------------------------------------------------------------------
 
@@ -58,6 +68,9 @@
     # lets get this out of the way right away ... increases the precision.
     set tcl_precision 17
 
+    # workaround to make Tcl reap zombie child processes once in a while
+    grimreaper
+
     # lets start with a "clean" slate
     acctSetClean