diff options
Diffstat (limited to 'stdlib/source/lux/data/collection/list.lux')
-rw-r--r-- | stdlib/source/lux/data/collection/list.lux | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/stdlib/source/lux/data/collection/list.lux b/stdlib/source/lux/data/collection/list.lux index bf4661ad4..fa18cfd19 100644 --- a/stdlib/source/lux/data/collection/list.lux +++ b/stdlib/source/lux/data/collection/list.lux @@ -10,7 +10,10 @@ [predicate (#+ Predicate)]] [data ["." bit] - ["." product]]]) + ["." product]] + [tool + [compiler + ["." host]]]]) ## (type: (List a) ## #Nil @@ -551,10 +554,10 @@ (do monad [lMla MlMla ## TODO: Remove this version ASAP and use one below. - lla (: (($ 0) (List (List ($ 1)))) - (monad.seq @ lMla)) - ## lla (monad.seq @ lMla) - ] + lla (`` (for {(~~ (static host.old)) + (: (($ 0) (List (List ($ 1)))) + (monad.seq @ lMla))} + (monad.seq @ lMla)))] (wrap (concat lla))))) (def: #export (lift monad) |