From 36b89b978e8bc6f084e67a11207488ea2fe25c72 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Wed, 4 Oct 2017 05:15:18 -0400 Subject: - Fixed the tests for lux/math/random. --- stdlib/source/lux/math/random.lux | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) (limited to 'stdlib/source') diff --git a/stdlib/source/lux/math/random.lux b/stdlib/source/lux/math/random.lux index 3225f1d6e..c922cee21 100644 --- a/stdlib/source/lux/math/random.lux +++ b/stdlib/source/lux/math/random.lux @@ -5,14 +5,13 @@ ["M" monad #+ do Monad] hash) (data [bit] - [text "Text/" Monoid] - text/format + [text "text/" Monoid] [product] [maybe] [number] (number ["r" ratio] ["c" complex]) - (coll [list "List/" Fold] + (coll [list "list/" Fold] ["a" array] ["D" dict] ["Q" queue] @@ -106,7 +105,7 @@ (do Monad [x char-gen xs (text' char-gen (n.dec size))] - (wrap (Text/compose (text;from-code x) xs))))) + (wrap (text/compose (text;from-code x) xs))))) (def: #export (text size) (-> Nat (Random Text)) @@ -203,7 +202,7 @@ [array a;Array a;from-list] [queue Q;Queue Q;from-list] - [stack ST;Stack (List/fold ST;push ST;empty)] + [stack ST;Stack (list/fold ST;push ST;empty)] ) (def: #export (set Hash size value-gen) -- cgit v1.2.3