[araneida-devel] Compilation broken on SBCL 1.0.9 FreeBSD

[Julian Stecklina]

Hello,

araneida-testing does not compile on SBCL 1.0.9 on FreeBSD, because 
SB-SYS:WITH-ENABLED-INTERRUPTS used in WITH-IGNORED-SIGNALS does not 
exist. A quick grep through the source tells me that 
WITH-IGNORED-SIGNALS is not used anywhere, so I propose the attached patch.

Regards,
Julian
-------------- next part --------------
diff -rN -u old-araneida-testing/macros.lisp new-araneida-testing/macros.lisp
--- old-araneida-testing/macros.lisp	2007-09-02 02:00:03.000000000 +0200
+++ new-araneida-testing/macros.lisp	2007-09-02 02:00:03.000000000 +0200
@@ -1,17 +1,5 @@
 (in-package :araneida)
 
-#+sbcl
-(defmacro with-ignored-signals (signals &body body)
-  (let ((sighandlers
-         (mapcar (lambda (sig) (list sig :ignore)) signals)))
-    `(sb-sys:with-enabled-interrupts ,sighandlers , at body)))
-
-#+cmu
-(defmacro with-ignored-signals (signals &body body)
-  (let ((sighandlers
-         (mapcar (lambda (sig) (list sig :ignore)) signals)))
-    `(system:with-enabled-interrupts ,sighandlers , at body)))
-
 ; Cribbed from Paul Graham
 (defmacro with-gensyms (syms &body body)
   `(let ,(mapcar #'(lambda (s)