From aedd7f485397b322fc88c60241fa1e5e684fd2b4 Mon Sep 17 00:00:00 2001
From: s-ol <s-ol@users.noreply.github.com>
Date: Fri, 17 Apr 2020 16:08:45 +0200
Subject: move extra/ to docs/gen/ and split up

---
 docs/gen/ldoc | 196 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 196 insertions(+)
 create mode 100755 docs/gen/ldoc

(limited to 'docs/gen/ldoc')

diff --git a/docs/gen/ldoc b/docs/gen/ldoc
new file mode 100755
index 0000000..b75740d
--- /dev/null
+++ b/docs/gen/ldoc
@@ -0,0 +1,196 @@
+#!/usr/bin/env moon
+import layout from require 'docs.gen.layout'
+
+export OUT, BASE 
+
+spit = (file, str) ->
+  file = io.open file, 'w'
+  file\write str
+  file\close!
+
+{ OUT } = arg
+BASE = '$(base)'
+
+spit OUT, layout
+  style: '$(ldoc.css)'
+  title: '$(ldoc.title)'
+  class: 'ldoc'
+  preamble: '
+# local iter = ldoc.modules.iter
+# local M = ldoc.markup
+# local function display_name(item)
+#   if item.type == "function" then
+#     return item.name:gsub(":new$", "")..item.args
+#   else return item.name end
+#  end
+# local function use_li(ls)
+#   if #ls > 1 then return "<li>","</li>" else return "","" end
+# end
+# local base = module and "../../" or "../"'
+  body: {
+    class: 'ldoc'
+    '
+# if ldoc.body then
+  $(ldoc.body)
+# elseif not module then
+# if ldoc.description then
+  <h1>$(M(ldoc.description))</h1>
+# end
+# if ldoc.full_description then
+  <p>$(M(ldoc.full_description))</p>
+#end
+
+# for kind, mods in ldoc.kinds() do
+#   kind = kind:lower()
+    <h2>$(kind)</h2>
+    <ul>
+#   for m in mods() do
+      <li>
+#       if m.summary then
+    		<label><a href="$(kind)/$(m.name).html"><code>$(m.name)</code></a>:</label>
+    		<span>$(M(m.summary))</span>
+# else
+       	<label><a href="$(kind)/$(m.name).html"><code>$(m.name)</code></a></label>
+# end
+    	</tr>
+#   end
+    </ul>
+# end
+# else
+  <h1>$(ldoc.module_typename(module):lower()) <code>$(module.name)</code></h1>
+  <p>$(M(module.summary, module))</p>
+  <p>$(M(module.description, module))</p>
+
+# if module.see then
+#   local li,il = use_li(module.see)
+    <h3>see also:</h3>
+    <ul>
+#   for see in iter(module.see) do
+      $(li)<a href="$(ldoc.href(see))">$(see.label)</a>$(il)
+#   end
+    </ul>
+# end
+
+# if module.kinds()() then
+    <h2>index</h2>
+#   for kind, items in module.kinds() do
+#     kind = kind:lower()
+      <h3 class="indent">$(kind)</h3>
+      <ul>
+#     for item in items() do
+        <li>
+          <a href="#$(item.name)"><code>$(display_name(item))</code></a>
+          &ensp;&ndash;&ensp;$(M(item.summary))
+        </li>
+#     end
+      </ul>
+#   end
+
+    <h2>details</h2>
+#   for kind, items in module.kinds() do
+#     kind = kind:lower()
+      <h3 class="indent">$(kind)</h3>
+      <ul>
+#     for item in items() do
+        <li class="def" id="$(item.name)">
+          <label>
+            <a href="#$(item.name)"><code>$(display_name(item))</code></a>
+          </label>
+          &ensp;&ndash;&ensp;$(M(item.summary))
+          <div class="nest">
+          $(M(item.description))
+
+#         if item.usage then
+#           local li,il = use_li(item.usage)
+            <h4>usage:</h4>
+            <ul>
+#           for usage in iter(item.usage) do
+              $(li)<pre class="example"><code>$(usage)</code></pre>$(il)
+#           end
+            </ul>
+#         end
+
+#         if item.params and #item.params > 0 then
+#           local subnames = module.kinds:type_of(item).subnames
+#           if subnames then
+              <h4>$(subnames:lower()):</h4>
+#           end
+            <ul>
+#           for parm in iter(item.params) do
+#             local param,sublist = item:subparam(parm)
+#             for p in iter(param) do
+#               local name = item:display_name_of(p)
+#               local tp = ldoc.typename(item:type_of_param(p))
+#               local def = item:default_of_param(p)
+#               local desc = item.params.map[p]
+#               local col = desc and desc ~= "" and ":" or ""
+                <li>
+                  <label>
+                    <code>$(name)</code>
+#                   if tp ~= "" then
+                      ($(tp))$(col)
+#                   else
+                      $(col)
+#                   end
+                  </label>
+                  $(M(desc,item))
+#               if def == true then
+                  (<em>optional</em>)
+#               elseif def then
+                  (<em>default</em> $(def))
+#               end
+                </li>
+#             end
+#           end
+            </ul>
+#         end
+
+#         if item.retgroups then local groups = item.retgroups
+            <h4>returns:</h4>
+#           for i,group in ldoc.ipairs(groups) do
+              <ol>
+#             for r in group:iter() do
+#               local type, ctypes = item:return_type(r)
+#               local rt = ldoc.typename(type)
+#               local col = r.text and r.text ~= "" and ":" or ""
+                <li>
+#                 if rt ~= "" then
+                    ($(rt))$(col)
+#                 end
+                  $(M(r.text,item))
+#                 if ctypes then
+                    <ul>
+#                   for c in ctypes:iter() do
+                      <li><span class="parameter">$(c.name)</span>
+                      <span class="types">$(ldoc.typename(c.type))</span>
+                      $(M(c.comment,item))</li>
+#                   end
+                    </ul>
+#                 end
+                </li>
+#             end
+              </ol>
+#             if i < #groups then
+               <h4>or</h4>
+#             end
+#           end
+#         end
+
+#         if item.usage then
+#           local li,il = use_li(item.usage)
+            <h4>usage:</h4>
+            <ul>
+#           for usage in iter(item.usage) do
+              $(li)<pre class="example">$(ldoc.prettify(usage))</pre>$(il)
+#           end
+            </ul>
+#         end
+          </div>
+      </li>
+#     end
+  </ul>
+#   end
+# end
+# end
+'
+  }
-- 
cgit v1.2.3