X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Fsparc-vm.lisp;h=1ef6009e1d18a5077e1e746f07d7c401a59e38c9;hb=ca267caa3bdb897a93a1e69ae7300ba3ba5d391f;hp=6c3d95ec3db5aadc5e5fc397d206f3a8113ca573;hpb=d0552bdb80b50eb2c600de19b89b2d7139c4841c;p=sbcl.git

diff --git a/src/code/sparc-vm.lisp b/src/code/sparc-vm.lisp
index 6c3d95e..1ef6009 100644
--- a/src/code/sparc-vm.lisp
+++ b/src/code/sparc-vm.lisp
@@ -100,6 +100,7 @@
 ;;; Under Linux, we have to contend with utterly broken signal handling.
 #!+linux
 (defun context-floating-point-modes (context)
+  (declare (ignore context))
   (warn "stub CONTEXT-FLOATING-POINT-MODES")
   0)