aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/math/number/int.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/math/number/int.lux')
-rw-r--r--stdlib/source/library/lux/math/number/int.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/library/lux/math/number/int.lux b/stdlib/source/library/lux/math/number/int.lux
index d5a563dd5..2dfb5e7b8 100644
--- a/stdlib/source/library/lux/math/number/int.lux
+++ b/stdlib/source/library/lux/math/number/int.lux
@@ -32,7 +32,7 @@
(def .public (<= reference sample)
(-> Int Int Bit)
(if ("lux i64 <" reference sample)
- #1
+ true
("lux i64 =" reference sample)))
(def .public (> reference sample)
@@ -42,7 +42,7 @@
(def .public (>= reference sample)
(-> Int Int Bit)
(if ("lux i64 <" sample reference)
- #1
+ true
("lux i64 =" reference sample)))
(with_template [<comparison> <name>]
@@ -222,13 +222,13 @@
(let [input_size ("lux text size" repr)]
(if (//nat.> 1 input_size)
(case ("lux text clip" 0 1 repr)
- (static ..+sign)
+ ..+sign
(|> repr
("lux text clip" 1 (-- input_size))
(at <codec> decoded)
(at try.functor each (|>> .int)))
- (static ..-sign)
+ ..-sign
(|> repr
("lux text clip" 1 (-- input_size))
(at <codec> decoded)