From e1d8415ed02b1ae18b421b1884fe5ceb37f6fa27 Mon Sep 17 00:00:00 2001 From: rtoy <rtoy> Date: Wed, 6 Feb 2008 18:13:06 +0000 Subject: [PATCH] Oops. It's OLD-X86, not OLD-SPARC! --- tools/cross-scripts/cross-x86-x86.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tools/cross-scripts/cross-x86-x86.lisp b/tools/cross-scripts/cross-x86-x86.lisp index a7131b88b..e14cfdfc8 100644 --- a/tools/cross-scripts/cross-x86-x86.lisp +++ b/tools/cross-scripts/cross-x86-x86.lisp @@ -132,8 +132,8 @@ OLD-X86:SINGLE-FLOAT-SIGNIFICAND-BYTE ) #+double-double - (frob OLD-SPARC:SIMPLE-ARRAY-COMPLEX-DOUBLE-DOUBLE-FLOAT-TYPE - OLD-SPARC:SIMPLE-ARRAY-DOUBLE-DOUBLE-FLOAT-TYPE)) + (frob OLD-X86:SIMPLE-ARRAY-COMPLEX-DOUBLE-DOUBLE-FLOAT-TYPE + OLD-X86:SIMPLE-ARRAY-DOUBLE-DOUBLE-FLOAT-TYPE)) ;; Modular arith hacks (setf (fdefinition 'vm::ash-left-mod32) #'old-x86::ash-left-mod32) -- GitLab