From 08efbee5fc752e5f0fac769c329bc1eefbf0e8d2 Mon Sep 17 00:00:00 2001 From: David Lichteblau Date: Fri, 7 Sep 2012 16:09:28 +0200 Subject: [PATCH] Ignore an argument in x86's EMIT-CONSTANT-SEGMENT-HEADER Fixes the build on this platform. --- src/compiler/x86/insts.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/compiler/x86/insts.lisp b/src/compiler/x86/insts.lisp index cc6b53e..0509468 100644 --- a/src/compiler/x86/insts.lisp +++ b/src/compiler/x86/insts.lisp @@ -2884,7 +2884,7 @@ :disp (make-fixup nil :code-object label))))) (defun emit-constant-segment-header (segment constants optimize) - (declare (ignore constants)) + (declare (ignore segment constants)) (loop repeat (if optimize 64 16) do (inst byte #x90))) (defun size-nbyte (size) -- 1.7.10.4