diff options
| author | Eduardo Julian | 2020-05-17 20:10:42 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2020-05-17 20:10:42 -0400 |
| commit | d97f92842981501a8e0d95a1b4f1ba3d9e72f0d5 (patch) | |
| tree | 3aa01a37da19e1e63bbf8cd204ae6743166e386a /stdlib/source/program | |
| parent | 9219da9a9bf29b3a2f7f10d4865b939ded28e003 (diff) | |
Local binding names for (co|indexed-)?monads are now explicitly set.
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/program/compositor.lux | 2 | ||||
| -rw-r--r-- | stdlib/source/program/scriptum.lux | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux index ecce5fa65..8993f21e7 100644 --- a/stdlib/source/program/compositor.lux +++ b/stdlib/source/program/compositor.lux @@ -84,7 +84,7 @@ Configuration [(-> (Row [Module (generation.Buffer artifact)]) Binary) Path] (Promise Any))) - (do promise.monad + (do {@ promise.monad} [platform (promise.future platform) console (|> console.system promise.future diff --git a/stdlib/source/program/scriptum.lux b/stdlib/source/program/scriptum.lux index f44abef88..419e8a4c9 100644 --- a/stdlib/source/program/scriptum.lux +++ b/stdlib/source/program/scriptum.lux @@ -375,7 +375,7 @@ (def: (document-types module types) (-> Text (List Value) (Meta (Markdown Block))) - (do macro.monad + (do {@ macro.monad} [type-docs (monad.map @ (: (-> Value (Meta (Markdown Block))) (function (_ [name def-annotations type]) @@ -498,7 +498,7 @@ (wrap []))))) (macro: (gen-documentation! _) - (do macro.monad + (do {@ macro.monad} [all-modules macro.modules #let [lux-modules (|> all-modules (list.filter (function.compose lux-module? product.left)) |