removed debugging output

scsh/procobj.scm

@@ -207,15 +207,13 @@
 ;;;   Return true if no more outstanding children; #f if some still live.
 
 (define (reap-zombies)
-  (display "reap-zombies was called" (current-error-port))
-  (newline)
   (let lp ()
     (receive (pid status) (%wait-any (bitwise-ior wait/poll 
 						  wait/stopped-children))
       (if pid
 	  (begin (waited-by-reap pid status)
-		 (format (current-error-port)
-			 "Reaping ~d[~d]~%" pid status)
+;		 (format (current-error-port)
+;			 "Reaping ~d[~d]~%" pid status)
 		 (lp))
 	  status))))