diff options
| author | Eduardo Julian | 2020-10-31 20:26:37 -0400 | 
|---|---|---|
| committer | Eduardo Julian | 2020-10-31 20:26:37 -0400 | 
| commit | 69272f598d831e89da83bdc8c9290d5607dfb14d (patch) | |
| tree | 4915f241708344209d4c35ccdc8b8e57bab68e4c /stdlib/source/test/lux/macro/poly/equivalence.lux | |
| parent | eea741e9b4a47ae09832311d6d61f0bd6024f673 (diff) | |
Re-named the directory for my bookmarks to better reflect what they are.
Diffstat (limited to 'stdlib/source/test/lux/macro/poly/equivalence.lux')
| -rw-r--r-- | stdlib/source/test/lux/macro/poly/equivalence.lux | 6 | 
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/test/lux/macro/poly/equivalence.lux b/stdlib/source/test/lux/macro/poly/equivalence.lux index 985da657c..1790c0111 100644 --- a/stdlib/source/test/lux/macro/poly/equivalence.lux +++ b/stdlib/source/test/lux/macro/poly/equivalence.lux @@ -50,9 +50,9 @@  (def: gen-record    (Random Record) -  (do {@ random.monad} -    [size (:: @ map (n.% 2) random.nat) -     #let [gen-int (|> random.int (:: @ map (|>> i.abs (i.% +1,000,000))))]] +  (do {! random.monad} +    [size (:: ! map (n.% 2) random.nat) +     #let [gen-int (|> random.int (:: ! map (|>> i.abs (i.% +1,000,000))))]]      ($_ random.and          random.bit          gen-int  | 
