X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fassembly%2Fppc%2Farray.lisp;h=ba9ebf04b904173df390fd6611a7154f8172cdce;hb=ef339cbbd81c403e117953b08eac7f446dc151ba;hp=a584f5c45b04674e87432d283fafc7801fc9eded;hpb=cab2c71bb1bb8a575d9eebdae335e731daa64183;p=sbcl.git

diff --git a/src/assembly/ppc/array.lisp b/src/assembly/ppc/array.lisp
index a584f5c..ba9ebf0 100644
--- a/src/assembly/ppc/array.lisp
+++ b/src/assembly/ppc/array.lisp
@@ -28,7 +28,7 @@
 
 
 ;;;; Hash primitives
-
+#|
 #+sb-assembling
 (defparameter sxhash-simple-substring-entry (gen-label))
 
@@ -95,3 +95,4 @@
 
   (inst slwi result accum 5)
   (inst srwi result result 3))
+|#
\ No newline at end of file