From 37325c9bd2c70d19a663541a4e23f7bf6f86d478 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Wed, 13 Apr 2011 12:16:00 +0200 Subject: [PATCH] revert 4a2ac0623c3dabb2c8b9d38c27b837dcb2c7fe4e * module/ice-9/popen.scm (open-pipe*): No need to pump the pipes guardian here, now that hooks are working again. --- module/ice-9/popen.scm | 4 ---- 1 file changed, 4 deletions(-) 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)