18 lines
482 B
Plaintext
18 lines
482 B
Plaintext
import DocGen4
|
|
import Lean
|
|
|
|
open DocGen4 Lean IO
|
|
|
|
def main (args : List String) : IO Unit := do
|
|
if args.isEmpty then
|
|
IO.println "Usage: doc-gen4 root/url/ Module1 Module2 ..."
|
|
IO.Process.exit 1
|
|
return
|
|
let root := args.head!
|
|
let modules := args.tail!
|
|
let path ← lakeSetupSearchPath (←getLakePath) modules.toArray
|
|
IO.println s!"Loading modules from: {path}"
|
|
let doc ← load $ modules.map Name.mkSimple
|
|
IO.println "Outputting HTML"
|
|
htmlOutput doc root
|