Diff of /src/code/float-trap.lisp [987e39] .. [f60e99] Maximize Restore

  Switch to side-by-side view

--- a/src/code/float-trap.lisp
+++ b/src/code/float-trap.lisp
@@ -118,7 +118,8 @@
             (or (cdr (assoc precision *precision-mode-alist*))
                 (error "unknown precision mode: ~S" precision))))
     ;; FIXME: This apparently doesn't work on Darwin
-    #!-darwin (setf (floating-point-modes) modes))
+    #!-(and darwin (or ppc x86))
+    (setf (floating-point-modes) modes))
   (values))
 
 (defun get-floating-point-modes ()