X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-rotate-byte%2Fsb-rotate-byte.asd;fp=contrib%2Fsb-rotate-byte%2Fsb-rotate-byte.asd;h=908392d7f103493db0feca20873038f786de0eb0;hb=d6db469884468ef1cbe41fdad328eda5fb9934a4;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..908392d 100644
--- a/contrib/sb-rotate-byte/sb-rotate-byte.asd
+++ b/contrib/sb-rotate-byte/sb-rotate-byte.asd
@@ -7,7 +7,7 @@
 (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"))
@@ -21,7 +21,7 @@
              (:file "ppc-vm"
                     :in-order-to ((compile-op (feature :ppc)))))
             :pathname
-            #+sb-building-contrib #.(logical-pathname "SYS:CONTRIB;SB-ROTATE-BYTE;")
+            #+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"))))