File float-traps.patch of Package sbcl

diff --git a/src/compiler/riscv/parms.lisp b/src/compiler/riscv/parms.lisp
index e05b33301..a41685d62 100644
--- a/src/compiler/riscv/parms.lisp
+++ b/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