diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/lux/abstract/hash.lux | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/stdlib/source/lux/abstract/hash.lux b/stdlib/source/lux/abstract/hash.lux index 752227fb7..e2716335c 100644 --- a/stdlib/source/lux/abstract/hash.lux +++ b/stdlib/source/lux/abstract/hash.lux @@ -1,5 +1,5 @@ (.module: - lux + [lux #*] [// ["." equivalence (#+ Equivalence)]]) @@ -18,5 +18,7 @@ (equivalence.product (:: leftH &equivalence) (:: rightH &equivalence))) (def: (hash [leftV rightV]) - (n/* (:: leftH hash leftV) - (:: rightH hash rightV))))) + (:coerce Nat + ("lux i64 *" + (:coerce Int (:: leftH hash leftV)) + (:coerce Int (:: rightH hash rightV))))))) |