CMUCL commit: amd64-dd-branch src/compiler (loadbackend.lisp)

[Raymond Toy]

    Date: Wednesday, November 4, 2009 @ 22:07:06
  Author: rtoy
    Path: /project/cmucl/cvsroot/src/compiler
     Tag: amd64-dd-branch

Modified: loadbackend.lisp

Need to load x87-array!


------------------+
 loadbackend.lisp |    5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)


Index: src/compiler/loadbackend.lisp
diff -u src/compiler/loadbackend.lisp:1.10 src/compiler/loadbackend.lisp:1.10.12.1
--- src/compiler/loadbackend.lisp:1.10	Wed Nov 12 10:04:23 2008
+++ src/compiler/loadbackend.lisp	Wed Nov  4 22:07:06 2009
@@ -5,7 +5,7 @@
 ;;; Carnegie Mellon University, and has been placed in the public domain.
 ;;;
 (ext:file-comment
-  "$Header: /project/cmucl/cvsroot/src/compiler/loadbackend.lisp,v 1.10 2008-11-12 15:04:23 rtoy Rel $")
+  "$Header: /project/cmucl/cvsroot/src/compiler/loadbackend.lisp,v 1.10.12.1 2009-11-05 03:07:06 rtoy Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -63,7 +63,8 @@
 (load "vm:values")
 ;; These need to be loaded before array because array wants to use
 ;; some vops as templates.
-(when (target-featurep :x86)
+(when (or (target-featurep :x86)
+	  (target-featurep :amd64))
   (load (if (target-featurep :sse2)
 	    "vm:sse2-array"
 	    "vm:x87-array")))