database/sqlite
1
0
Fork 0
mirror of https://github.com/sqlite/sqlite.git synced 2025-07-30 19:03:16 +03:00
Code Activity

Fix inconsistencies in formatting of fts5 docs.

Browse Source 
FossilOrigin-Name: 5fb4c77163be8d5ff1e2934dda3cc2ad0a6267e8
This commit is contained in:
dan
2015-07-10 17:55:42 +00:00
parent d2454f47e7
commit 3eb9024d68
3 changed files with 21 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
ext/fts5/extract_api_docs.tcl
View File

@ -134,6 +134,7 @@ proc get_api_docs {data} {
#
set D [get_struct_docs $data [array names M]]
output "<dl>"
foreach {sub docs} $D {
if {[info exists M($sub)]} {
set hdr $M($sub)
@ -142,12 +143,17 @@ proc get_api_docs {data} {
set link ""
}
output "<hr color=#eeeee style=\"margin:1em 8.4ex 0 8.4ex;\"$link>"
set style "padding-left:6ex;font-size:1.4em;display:block"
output "<h style=\"$style\"><pre>$hdr</pre></h>"
#output "<hr color=#eeeee style=\"margin:1em 8.4ex 0 8.4ex;\"$link>"
#set style "padding-left:6ex;font-size:1.4em;display:block"
#output "<h style=\"$style\"><pre>$hdr</pre></h>"
regsub -line {^ *[)]} $hdr ")" hdr
output "<dt style=\"white-space:pre;font-family:monospace;font-size:120%\""
output "$link>"
output "<b>$hdr</b></dt><dd>"
set mode ""
set bEmpty 1
set margin " style=margin-top:0.1em"
foreach line [split [string trim $docs] "\n"] {
if {[string trim $line]==""} {
if {$mode != ""} {output "</$mode>"}
@ -158,12 +164,15 @@ proc get_api_docs {data} {
} else {
set mode p
}
output "<$mode>"
output "<$mode$margin>"
set margin ""
}
output $line
}
if {$mode != ""} {output "</$mode>"}
output "</dd>"
}
output "</dl>"
}
proc get_fts5_struct {data start end} {