diff options
| author | Eduardo Julian | 2017-10-04 05:15:18 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2017-10-04 05:15:18 -0400 |
| commit | 36b89b978e8bc6f084e67a11207488ea2fe25c72 (patch) | |
| tree | 7f57da40e80de58386dd53ed55546388bdf557d2 /stdlib/source | |
| parent | 567a7580df7f1d62434865c28f68e51941279e76 (diff) | |
- Fixed the tests for lux/math/random.
Diffstat (limited to 'stdlib/source')
| -rw-r--r-- | stdlib/source/lux/math/random.lux | 9 |
1 files changed, 4 insertions, 5 deletions
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>] - text/format + [text "text/" Monoid<Text>] [product] [maybe] [number] (number ["r" ratio] ["c" complex]) - (coll [list "List/" Fold<List>] + (coll [list "list/" Fold<List>] ["a" array] ["D" dict] ["Q" queue] @@ -106,7 +105,7 @@ (do Monad<Random> [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<a> size value-gen) |