stdlib/source/documentation/lux/documentation.lux


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37

(.require
 [library
  [lux (.except)
   [data
    ["[0]" text (.only \n)
     ["%" \\format (.only format)]]]]]
 [\\library
  ["[0]" /]])

(with_expansions [<default> (/.definition /.default
                              ""
                              [(is /.Definition
                                   (default ..definition))])
                  <documentation> (/.definition /.definition
                                    ""
                                    [<default>])
                  <all> (these (/.default /.unqualified_symbol)
                               (/.default /.Definition)
                               (/.default /.Module)
                               (/.default /.definition)

                               <default>
                               <documentation>)]
  (.def .public documentation
    (.List /.Module)
    (/.module /._
              ""
              [<all>

               (/.definition /.module
                 ""
                 [(is (.List /.Module)
                      (module /._
                              ""
                              [<all>]
                              []))])]
              [])))