--- a/src/process.c	Mon Aug 13 09:15:51 2007 +0200
+++ b/src/process.c	Mon Aug 13 09:16:51 2007 +0200
@@ -1446,8 +1446,11 @@
 	{
 	  /* A delay here is needed on some FreeBSD systems,
 	     and it is harmless, since this retrying takes time anyway
-	     and should be infrequent.  */
-	  Fsleep_for (make_int (1));
+	     and should be infrequent.
+             `sleep-for' allowed for quitting this loop with interrupts
+             slowed down so it can't be used here.  Async timers should
+             already be disabled at this point so we can use `sleep'. */
+          sleep (1);
 	  retry++;
 	  goto loop;
 	}