small steps
[software/python-on-guile.git] / modules / language / python / hash.scm
index ca5e32e5ea2eb6cfcb3346d469f205700f0b9e8f..168cd44079e4b4a6a3742c0964be31d6811f2d60 100644 (file)
@@ -11,7 +11,7 @@
 (define-inlinable (xy v seed)
   (modulo
    (logxor seed
-           (+ (py-hash v)
+           (+ v
               #x9e3779b9
               (ash seed 6)
               (ash seed -2)))
@@ -43,6 +43,6 @@
 
 (define-method (py-hash (x <p>))
   (aif it (ref x '__hash__)
-       (it)
-       (hash x complexity)))
+       (pk 'hash (it))
+       (next-method)))