From b37ee1917715caf2b52973e984dfc6a220e2d2de Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@jjgr-2.local>
Date: Wed, 2 Dec 2009 22:03:53 +0100
Subject: [PATCH] The code for disabling interrupts was outdated in clx
 (src/clx/dependent)

---
 src/clx/dependent.lisp | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/src/clx/dependent.lisp b/src/clx/dependent.lisp
index 6e91b90d0..d595f12f2 100644
--- a/src/clx/dependent.lisp
+++ b/src/clx/dependent.lisp
@@ -1347,10 +1347,7 @@
 
 #+ecl
 (defmacro without-interrupts (&body body)
-  #+threads
-  `(mp:without-interrupts ,@body)
-  #-threads
-  `(let ((ext:*interrupt-enable* nil)) ,@body))
+  `(mp:without-interrupts ,@body))
 
 #+sbcl
 (defvar *without-interrupts-sic-lock*