aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/data/format/xml.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/data/format/xml.lux')
-rw-r--r--stdlib/source/library/lux/data/format/xml.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/library/lux/data/format/xml.lux b/stdlib/source/library/lux/data/format/xml.lux
index b978eb195..637ba71f7 100644
--- a/stdlib/source/library/lux/data/format/xml.lux
+++ b/stdlib/source/library/lux/data/format/xml.lux
@@ -31,7 +31,7 @@
(Dictionary Attribute Text))
(def: .public attributes
- {#.doc (doc "An empty set of XML attributes.")}
+ {#.doc (example "An empty set of XML attributes.")}
Attrs
(dictionary.empty name.hash))
@@ -207,14 +207,14 @@
(text.replaced text.double_quote """)))
(def: .public (tag [namespace name])
- {#.doc (doc "The text format of a XML tag.")}
+ {#.doc (example "The text format of a XML tag.")}
(-> Tag Text)
(case namespace
"" name
_ ($_ text\compose namespace ..namespace_separator name)))
(def: .public attribute
- {#.doc (doc "The text format of a XML attribute.")}
+ {#.doc (example "The text format of a XML attribute.")}
(-> Attribute Text)
..tag)
@@ -273,7 +273,7 @@
text.new_line prefix "</" tag ">")))))
))))
(def: decode
- (<text>.run ..xml^)))
+ (<text>.result ..xml^)))
(implementation: .public equivalence
(Equivalence XML)
@@ -290,7 +290,7 @@
(n.= (list.size reference/children)
(list.size sample/children))
(|> (list.zipped/2 reference/children sample/children)
- (list.every? (product.uncurry =))))
+ (list.every? (product.uncurried =))))
_
false)))