Eliminate unused variable warnings.

diff --git a/src/runtime/ieee754.scm b/src/runtime/ieee754.scm
index 0be4510606b668297c403971d2ed9d727aead288..3a77ba11a919c3033b3656140044f72cb002a9c5 100644 (file)
--- a/src/runtime/ieee754.scm
+++ b/src/runtime/ieee754.scm
@@ -165,6 +165,7 @@ USA.
      (flo:+inf.0)))
 
 (define (compose-ieee754-nan sign quiet payload)
+  (declare (ignore sign quiet payload))
   (flo:nan.0))
 
 (define (ieee754-binary-parameters exponent-bits precision)