14 lines
634 B
Diff
14 lines
634 B
Diff
|
Index: sbcl-2.6.0/src/compiler/riscv/parms.lisp
|
||
|
|
===================================================================
|
||
|
|
--- sbcl-2.6.0.orig/src/compiler/riscv/parms.lisp
|
||
|
|
+++ sbcl-2.6.0/src/compiler/riscv/parms.lisp
|
||
|
|
@@ -51,7 +51,7 @@
|
||
|
|
(defconstant-eqx float-rounding-mode (byte 3 5) #'equalp)
|
||
|
|
(defconstant-eqx float-sticky-bits (byte 5 0) #'equalp)
|
||
|
|
;;;; RISC-V has no explicit floating point traps.
|
||
|
|
-(defconstant-eqx float-traps-byte (byte 5 0) #'equalp)
|
||
|
|
+(defconstant-eqx float-traps-byte (byte 0 0) #'equalp)
|
||
|
|
(defconstant-eqx float-exceptions-byte (byte 5 0) #'equalp)
|
||
|
|
(defconstant float-fast-bit (ash 1 24)) ;; Flush-to-zero mode
|
||
|
|
|