From: Andy Wingo <wingo@pobox.com>
Date: Wed, 13 Apr 2011 10:16:00 +0000 (+0200)
Subject: revert 4a2ac0623c3dabb2c8b9d38c27b837dcb2c7fe4e
X-Git-Tag: v2.0.1~44
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=37325c9bd2c70d19a663541a4e23f7bf6f86d478;p=platform%2Fupstream%2Fguile.git

revert 4a2ac0623c3dabb2c8b9d38c27b837dcb2c7fe4e

* module/ice-9/popen.scm (open-pipe*): No need to pump the pipes
  guardian here, now that hooks are working again.
---

diff --git a/module/ice-9/popen.scm b/module/ice-9/popen.scm
index 5445ecb6b..b3def4a1e 100644
--- a/module/ice-9/popen.scm
+++ b/module/ice-9/popen.scm
@@ -139,10 +139,6 @@ A port to the process (based on pipes) is created and returned.
 @var{modes} specifies whether an input, an output or an input-output
 port to the process is created: it should be the value of
 @code{OPEN_READ}, @code{OPEN_WRITE} or @code{OPEN_BOTH}."
-
-  ;; Until we get GC hooks working again, pump the guardian here.
-  (reap-pipes)
-
   (let* ((port/pid (apply open-process mode command args))
 	 (port (car port/pid)))
     (pipe-guardian port)