From 6bb6029f426ecb2da772f6f9c70cdb81c897f0db Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Fri, 29 Mar 2019 22:58:33 -0400 Subject: Fixed more tests. --- stdlib/source/lux.lux | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'stdlib/source/lux.lux') diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux index 2add33e57..ebdf57efb 100644 --- a/stdlib/source/lux.lux +++ b/stdlib/source/lux.lux @@ -2464,7 +2464,7 @@ high-bits ("lux i64 +" top)))) -(def:''' least-significant-bit-mask (list) Nat 1) +(def:''' least-significant-bit-mask (list) ($' I64 Any) 1) (def:''' (without-trailing-zeroes count remaining) (list) @@ -2502,8 +2502,8 @@ (text$ "Rev(olution) remainder.")]) (-> Rev Rev Rev) ("lux coerce" Rev - (n/% ("lux coerce" Nat subject) - ("lux coerce" Nat param)))) + (n/% ("lux coerce" Nat param) + ("lux coerce" Nat subject)))) (def:''' #export (r/scale param subject) (list [(tag$ ["lux" "doc"]) -- cgit v1.2.3