aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/scriptum.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/program/scriptum.lux')
-rw-r--r--stdlib/source/program/scriptum.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/program/scriptum.lux b/stdlib/source/program/scriptum.lux
index 708db73dd..5d3117062 100644
--- a/stdlib/source/program/scriptum.lux
+++ b/stdlib/source/program/scriptum.lux
@@ -127,7 +127,7 @@
_
(|> members
- (list.zip/2 tags)
+ (list.zipped/2 tags)
(list\map (function (_ [[_ t_name] type])
(case type
(#.Product _)
@@ -150,7 +150,7 @@
_
(let [member_docs (|> members
- (list.zip/2 tags)
+ (list.zipped/2 tags)
(list\map (function (_ [[_ t_name] type])
(if signature?
(format "(: " (pprint_type_definition level type_func_info #.None module signature? recursive_type? type) text.new_line " " t_name ")")
@@ -378,7 +378,7 @@
")"))))
_
- (meta.fail (exception.construct anonymous_type_definition type))))
+ (meta.failure (exception.construct anonymous_type_definition type))))
(def: (document_types module types)
(-> Text (List Value) (Meta (Markdown Block)))
@@ -510,7 +510,7 @@
lux_exports (monad.map ! (function.compose meta.exports product.left)
lux_modules)
module_documentation (|> (list\map organize_definitions lux_exports)
- (list.zip/2 lux_modules)
+ (list.zipped/2 lux_modules)
(monad.map ! document_module))
#let [_ (io.run (monad.map io.monad save_documentation! module_documentation))]]
(wrap (list))))