aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/abstract/hash.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/abstract/hash.lux8
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)))))))