diff options
| author | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-04-17 16:02:56 +0200 |
|---|---|---|
| committer | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-04-17 16:02:56 +0200 |
| commit | 16d619f3fea2309d07d858165f272ed1b847298e (patch) | |
| tree | 20067f272afe266e1bbdc75b2d8b0955c51b3929 /modules/language/python/hash.scm | |
| parent | 7f4a0e43222e82c54e0e524356f470a738c9dc2a (diff) | |
small small steps of decimals
Diffstat (limited to 'modules/language/python/hash.scm')
| -rw-r--r-- | modules/language/python/hash.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/modules/language/python/hash.scm b/modules/language/python/hash.scm index ca5e32e..4fab02d 100644 --- a/modules/language/python/hash.scm +++ b/modules/language/python/hash.scm @@ -11,7 +11,7 @@ (define-inlinable (xy v seed) (modulo (logxor seed - (+ (py-hash v) + (+ v #x9e3779b9 (ash seed 6) (ash seed -2))) @@ -42,7 +42,7 @@ s)))) (define-method (py-hash (x <p>)) - (aif it (ref x '__hash__) - (it) - (hash x complexity))) + (aif it (pk 'it (ref x '__hash__)) + (pk 'hash (it)) + (next-method))) |