projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.8.0.5:
[sbcl.git]
/
src
/
cold
/
ansify.lisp
diff --git
a/src/cold/ansify.lisp
b/src/cold/ansify.lisp
index
50023dc
..
5bfa6d2
100644
(file)
--- a/
src/cold/ansify.lisp
+++ b/
src/cold/ansify.lisp
@@
-40,7
+40,10
@@
;; These problems don't seem deep, and could probably be worked
;; around.
#+nil (clisp-ouch "no (DOCUMENTATION X) when X is a PACKAGE")
;; These problems don't seem deep, and could probably be worked
;; around.
#+nil (clisp-ouch "no (DOCUMENTATION X) when X is a PACKAGE")
- #+nil (clisp-ouch "no (FUNCTION (SETF SYMBOL-FUNCTION))")))
+ #+nil (clisp-ouch "no (FUNCTION (SETF SYMBOL-FUNCTION))"))
+
+ (ext:without-package-lock ("SYSTEM")
+ (setf system::*inhibit-floating-point-underflow* t)))
\f
;;;; CMU CL issues
\f
;;;; CMU CL issues