r
/
bookshelf-doc
mirror of https://github.com/jrpotter/bookshelf-doc
1
Fork 0
Code Issues Packages Projects Releases Wiki Activity

feat: Declaration data into separate directory

main
Henrik Böving 2022-07-21 21:05:19 +02:00
parent f0a1ec2835
commit 71af8db54b
2 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
DocGen4/Output.lean
View File

@ -21,14 +21,16 @@ open Lean IO System Output Process Std
def basePath := FilePath.mk "." / "build" / "doc" def basePath := FilePath.mk "." / "build" / "doc"
def srcBasePath := basePath / "src" def srcBasePath := basePath / "src"
def declarationsBasePath := basePath / "declarations"
def htmlOutputSetup (config : SiteBaseContext) : IO Unit := do def htmlOutputSetup (config : SiteBaseContext) : IO Unit := do
let findBasePath := basePath / "find" let findBasePath := basePath / "find"
-- Base structure -- Base structure
FS.createDirAll basePath FS.createDirAll basePath
FS.createDirAll (basePath / "find") FS.createDirAll findBasePath
FS.createDirAll srcBasePath FS.createDirAll srcBasePath
FS.createDirAll declarationsBasePath
-- All the doc-gen static stuff -- All the doc-gen static stuff
let indexHtml := ReaderT.run index config |>.toString let indexHtml := ReaderT.run index config |>.toString
@ -86,6 +88,7 @@ def htmlOutputResults (baseConfig : SiteBaseContext) (result : AnalyzerResult) (
} }
FS.createDirAll basePath FS.createDirAll basePath
FS.createDirAll declarationsBasePath
-- Rendering the entire lean compiler takes time.... -- Rendering the entire lean compiler takes time....
--let sourceSearchPath := ((←Lean.findSysroot) / "src" / "lean") :: ws.root.srcDir :: ws.leanSrcPath --let sourceSearchPath := ((←Lean.findSysroot) / "src" / "lean") :: ws.root.srcDir :: ws.leanSrcPath
@ -99,7 +102,7 @@ def htmlOutputResults (baseConfig : SiteBaseContext) (result : AnalyzerResult) (
declMap := declMap.insert topLevelMod (currentModDecls ++ jsonDecls) declMap := declMap.insert topLevelMod (currentModDecls ++ jsonDecls)
for (topLevelMod, decls) in declMap.toList do for (topLevelMod, decls) in declMap.toList do
FS.writeFile (basePath / s!"declaration-data-{topLevelMod}.bmp") (Json.arr decls).compress FS.writeFile (declarationsBasePath / s!"declaration-data-{topLevelMod}.bmp") (Json.arr decls).compress
for (modName, module) in result.moduleInfo.toArray do for (modName, module) in result.moduleInfo.toArray do
let fileDir := moduleNameToDirectory basePath modName let fileDir := moduleNameToDirectory basePath modName
@ -133,13 +136,13 @@ def htmlOutputFinalize (baseConfig : SiteBaseContext) : IO Unit := do
htmlOutputSetup baseConfig htmlOutputSetup baseConfig
let mut topLevelModules := #[] let mut topLevelModules := #[]
for entry in ←System.FilePath.readDir basePath do for entry in ←System.FilePath.readDir declarationsBasePath do
if entry.fileName.startsWith "declaration-data-" && entry.fileName.endsWith ".bmp" then if entry.fileName.startsWith "declaration-data-" && entry.fileName.endsWith ".bmp" then
let module := entry.fileName.drop "declaration-data-".length |>.dropRight ".bmp".length let module := entry.fileName.drop "declaration-data-".length |>.dropRight ".bmp".length
topLevelModules := topLevelModules.push (Json.str module) topLevelModules := topLevelModules.push (Json.str module)
-- The root JSON for find -- The root JSON for find
FS.writeFile (basePath / "declaration-data.bmp") (Json.arr topLevelModules).compress FS.writeFile (declarationsBasePath / "declaration-data.bmp") (Json.arr topLevelModules).compress
/-- /--
The main entrypoint for outputting the documentation HTML based on an The main entrypoint for outputting the documentation HTML based on an

4
static/declaration-data.js
View File

@ -10,7 +10,7 @@ const CACHE_DB_KEY = "DECLARATIONS_KEY";
async function fetchModuleData(module) { async function fetchModuleData(module) {
const moduleDataUrl = new URL( const moduleDataUrl = new URL(
`${SITE_ROOT}declaration-data-${module}.bmp`, `${SITE_ROOT}/declarations/declaration-data-${module}.bmp`,
window.location window.location
); );
const moduleData = await fetch(moduleDataUrl); const moduleData = await fetch(moduleDataUrl);
@ -53,7 +53,7 @@ export class DeclarationDataCenter {
static async init() { static async init() {
if (!DeclarationDataCenter.singleton) { if (!DeclarationDataCenter.singleton) {
const dataListUrl = new URL( const dataListUrl = new URL(
`${SITE_ROOT}declaration-data.bmp`, `${SITE_ROOT}/declarations/declaration-data.bmp`,
window.location window.location
); );