Documentation Source Text

Check-in [06172b7a6f]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Add code to the sqlite3.h reader to ignore function requirement numbers embedded in the text.
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 06172b7a6f471cddd4e30037353e9a9153ee07a0
User & Date: drh 2007-11-30 01:05:40
Context
2007-11-30
01:34
Fix website typos and external hyperlink changes. check-in: e4ae9bdfda user: drh tags: trunk
01:05
Add code to the sqlite3.h reader to ignore function requirement numbers embedded in the text. check-in: 06172b7a6f user: drh tags: trunk
2007-11-28
22:22
Add documentation for the group_concat() function. check-in: 2fc1269200 user: drh tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to pages/capi3ref.in.

6
7
8
9
10
11
12


13
14

15
16
17
18

19
20
21
22
23
24
25
..
34
35
36
37
38
39
40








41
42
43
44
45
46
47
set in [open sqlite3.h]
set title {}
set type {}
set body {}
set code {}
set phase 0
set content {}


while {![eof $in]} {
  set line [gets $in]

  if {$phase==0} {
    # Looking for the CAPI3REF: keyword
    if {[regexp {^\*\* CAPI3REF: +(.*)} $line all tx]} {
      set title $tx

      set phase 1
    }
  } elseif {$phase==1} {
    if {[string range $line 0 1]=="**"} {
      set lx [string trim [string range $line 3 end]]
      if {[regexp {^CATEGORY: +([a-z]*)} $lx all cx]} {
        set type $cx
................................................................................
      set phase 2
    }
  } elseif {$phase==2} {
    if {$line==""} {
      set kwlist [lsort [array names keyword]]
      unset -nocomplain keyword
      set key $type:$kwlist








      lappend content [list $key $title $type $kwlist $body $code]
      set title {}
      set keywords {}
      set type {}
      set body {}
      set code {}
      set phase 0







>
>


>




>







 







>
>
>
>
>
>
>
>







6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
..
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
set in [open sqlite3.h]
set title {}
set type {}
set body {}
set code {}
set phase 0
set content {}
set lineno 0
set reqdb [open reqdb.sql w]
while {![eof $in]} {
  set line [gets $in]
  incr lineno
  if {$phase==0} {
    # Looking for the CAPI3REF: keyword
    if {[regexp {^\*\* CAPI3REF: +(.*)} $line all tx]} {
      set title $tx
      set title_lineno $lineno
      set phase 1
    }
  } elseif {$phase==1} {
    if {[string range $line 0 1]=="**"} {
      set lx [string trim [string range $line 3 end]]
      if {[regexp {^CATEGORY: +([a-z]*)} $lx all cx]} {
        set type $cx
................................................................................
      set phase 2
    }
  } elseif {$phase==2} {
    if {$line==""} {
      set kwlist [lsort [array names keyword]]
      unset -nocomplain keyword
      set key $type:$kwlist
      if {[regexp {\{([\w.]+)\}} $title all tag]} {
        regsub { *\{[\w.]+\}} $title {} title
        set qtitle '[string map {' ''} \
            $title\n<blockquote><pre>\n$code\n</pre></blockquote>]'
        real_puts $reqdb "INSERT INTO req\
           VALUES('$tag','sqlite3.h',$lineno,$qtitle);"
      }
      regsub -all { *\{[a-zA-Z0-9.]+\}} $body {} body
      lappend content [list $key $title $type $kwlist $body $code]
      set title {}
      set keywords {}
      set type {}
      set body {}
      set code {}
      set phase 0