exclude outputs from doc

This commit is contained in:
Daniel Barlow 2023-08-12 18:16:06 +01:00
parent dc4b7ebffd
commit e039783e67

View file

@ -67,9 +67,16 @@
(each [_ param (ipairs o.parameters)] (each [_ param (ipairs o.parameters)]
(print-option param 4))) (print-option param 4)))
(fn output? [option]
(match option.loc
["system" "outputs" & _] true
_ false))
(fn sort-options [module] (fn sort-options [module]
(table.sort module (fn [a b] (< a.name b.name))) (let [options (icollect [_ o (ipairs module)]
module) (if (not (output? o))
o))]
(doto options (table.sort (fn [a b] (< a.name b.name))))))
(let [raw (yaml.load (io.read "*a")) (let [raw (yaml.load (io.read "*a"))
modules {}] modules {}]