File riscv-float-traps.patch of Package sbcl
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