diff options
| author | Eduardo Julian | 2020-10-31 02:59:48 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2020-10-31 02:59:48 -0400 |
| commit | eea741e9b4a47ae09832311d6d61f0bd6024f673 (patch) | |
| tree | 9d503f609c322c235811856ffa05232991b9c653 /stdlib/source/program/scriptum.lux | |
| parent | cb8f2b36352948108446c7e3b270faa97589bf7a (diff) | |
Easy to use Rev constants.
Diffstat (limited to 'stdlib/source/program/scriptum.lux')
| -rw-r--r-- | stdlib/source/program/scriptum.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/program/scriptum.lux b/stdlib/source/program/scriptum.lux index 1cb0ee21a..9ad2c59a4 100644 --- a/stdlib/source/program/scriptum.lux +++ b/stdlib/source/program/scriptum.lux @@ -376,8 +376,8 @@ (def: (document-types module types) (-> Text (List Value) (Meta (Markdown Block))) - (do {@ macro.monad} - [type-docs (monad.map @ + (do {! macro.monad} + [type-docs (monad.map ! (: (-> Value (Meta (Markdown Block))) (function (_ [name def-annotations type]) (do macro.monad @@ -499,16 +499,16 @@ (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)) (list.sort name-sort))] - lux-exports (monad.map @ (function.compose macro.exports product.left) + lux-exports (monad.map ! (function.compose macro.exports product.left) lux-modules) module-documentation (|> (list@map organize-definitions lux-exports) (list.zip/2 lux-modules) - (monad.map @ document-module)) + (monad.map ! document-module)) #let [_ (io.run (monad.map io.monad save-documentation! module-documentation))]] (wrap (list)))) |