X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-rotate-byte%2Fsb-rotate-byte.asd;h=036f1ba484880e324afd98be87f09d8081557f22;hb=a37b7e2a4c93398af954c3f03c5412ead1c1c828;hp=a40834c6c143285b2bc8520def59e7bdeaa8c1a1;hpb=4fd24714c780827eec742db55297940ed7160ea7;p=sbcl.git

diff --git a/contrib/sb-rotate-byte/sb-rotate-byte.asd b/contrib/sb-rotate-byte/sb-rotate-byte.asd
index a40834c..036f1ba 100644
--- a/contrib/sb-rotate-byte/sb-rotate-byte.asd
+++ b/contrib/sb-rotate-byte/sb-rotate-byte.asd
@@ -7,23 +7,22 @@
 (defsystem sb-rotate-byte
   :version "0.1"
   #+sb-building-contrib :pathname
-  #+sb-building-contrib #.(logical-pathname "SYS:CONTRIB;SB-ROTATE-BYTE;")
+  #+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 "x86-64-vm"
-                    :in-order-to ((compile-op (feature :x86-64))))
-             (:file "ppc-vm"
-                    :in-order-to ((compile-op (feature :ppc)))))
+            (#+x86
+             (:file "x86-vm")
+             #+x86-64
+             (:file "x86-64-vm")
+             #+ppc
+             (:file "ppc-vm"))
             :pathname
-            #+sb-building-contrib #.(logical-pathname "SYS:CONTRIB;SB-ROTATE-BYTE;")
-            #-sb-building-contrib #.(make-pathname :directory '(:relative))
-            :if-component-dep-fails :ignore)
+            #+sb-building-contrib #p"SYS:CONTRIB;SB-ROTATE-BYTE;"
+            #-sb-building-contrib #.(make-pathname :directory '(:relative)))
    (:file "rotate-byte" :depends-on ("compiler"))))
 
 (defmethod perform :after ((o load-op) (c (eql (find-system :sb-rotate-byte))))