X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-rotate-byte%2Fsb-rotate-byte.asd;h=908392d7f103493db0feca20873038f786de0eb0;hb=06c288327bb8ea3a9534c63c0a8a909445a62054;hp=a445c1fb8978c037ed0764595f4754be9ef960a6;hpb=6ffb09605de7f990332aee146d8f69ba4cc907c9;p=sbcl.git

diff --git a/contrib/sb-rotate-byte/sb-rotate-byte.asd b/contrib/sb-rotate-byte/sb-rotate-byte.asd
index a445c1f..908392d 100644
--- a/contrib/sb-rotate-byte/sb-rotate-byte.asd
+++ b/contrib/sb-rotate-byte/sb-rotate-byte.asd
@@ -1,27 +1,29 @@
 ;;; -*-  Lisp -*-
 
-(cl:defpackage #:sb-rotate-byte-system 
+(cl:defpackage #:sb-rotate-byte-system
   (:use #:asdf #:cl))
 (cl:in-package #:sb-rotate-byte-system)
 
 (defsystem sb-rotate-byte
   :version "0.1"
   #+sb-building-contrib :pathname
-  #+sb-building-contrib "SYS:CONTRIB;SB-ROTATE-BYTE;"
-  :components 
+  #+sb-building-contrib #p"SYS:CONTRIB;SB-ROTATE-BYTE;"
+  :components
   ((:file "package")
    (:file "compiler" :depends-on ("package"))
    (:module "vm"
-	    :depends-on ("compiler")
-	    :components 
-	    ((:file "x86-vm"
-		    :in-order-to ((compile-op (feature :x86))))
-	     (:file "ppc-vm"
-		    :in-order-to ((compile-op (feature :ppc)))))
-	    :pathname
-	    #+sb-building-contrib "SYS:CONTRIB;SB-ROTATE-BYTE;"
-	    #-sb-building-contrib #.(make-pathname :directory '(:relative))
-	    :if-component-dep-fails :ignore)
+            :depends-on ("compiler")
+            :components
+            ((:file "x86-vm"
+                    :in-order-to ((compile-op (feature :x86))))
+             (:file "x86-64-vm"
+                    :in-order-to ((compile-op (feature :x86-64))))
+             (:file "ppc-vm"
+                    :in-order-to ((compile-op (feature :ppc)))))
+            :pathname
+            #+sb-building-contrib #p"SYS:CONTRIB;SB-ROTATE-BYTE;"
+            #-sb-building-contrib #.(make-pathname :directory '(:relative))
+            :if-component-dep-fails :ignore)
    (:file "rotate-byte" :depends-on ("compiler"))))
 
 (defmethod perform :after ((o load-op) (c (eql (find-system :sb-rotate-byte))))