aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/documentation/lux/documentation.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/documentation/lux/documentation.lux')
-rw-r--r--stdlib/source/documentation/lux/documentation.lux38
1 files changed, 22 insertions, 16 deletions
diff --git a/stdlib/source/documentation/lux/documentation.lux b/stdlib/source/documentation/lux/documentation.lux
index 2a65b298e..bf9a2e436 100644
--- a/stdlib/source/documentation/lux/documentation.lux
+++ b/stdlib/source/documentation/lux/documentation.lux
@@ -3,17 +3,21 @@
[lux (.except)
[data
["[0]" text (.only \n)
- ["%" \\format (.only format)]]]]]
+ ["%" \\format (.only format)]]
+ [collection
+ ["[0]" list]]]]]
[\\library
- ["[0]" /]])
+ ["[0]" /]]
+ ["[0]" /
+ ["[1][0]" remember]])
(with_expansions [<documentation> (/.definition /.definition)
<documentation> (/.definition /.definition
""
- [<documentation>])
+ (/.example <documentation>))
<documentation> (/.definition /.definition
""
- [<documentation>])
+ (/.example <documentation>))
<all> (these (/.definition /.unqualified_symbol)
(/.definition /.Definition)
(/.definition /.Module)
@@ -22,16 +26,18 @@
<documentation>)]
(def .public documentation
(List /.Documentation)
- (list (/.module /._
- "")
+ (list.together
+ (list (list (/.module /._
+ "")
- <all>
-
- (/.definition /.module
- ""
- [(is (.List /.Module)
- (module /._
- ""
- [<all>]
- []))])
- )))
+ <all>
+
+ (/.definition /.module
+ ""
+ (/.example (is (.List /.Module)
+ (module /._
+ ""
+ [<all>]
+ []))))
+ )
+ /remember.documentation))))