diff options
Diffstat (limited to 'tool/split-sqlite3c.tcl')
| -rw-r--r-- | tool/split-sqlite3c.tcl | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/tool/split-sqlite3c.tcl b/tool/split-sqlite3c.tcl index 9751e7de9..0308431da 100644 --- a/tool/split-sqlite3c.tcl +++ b/tool/split-sqlite3c.tcl @@ -48,7 +48,14 @@ set filecnt 0 proc write_one_file {content} { global filecnt incr filecnt - set out [open sqlite3-$filecnt.c w] + set label $filecnt + if {$filecnt>9} { + set label [string index ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnop \ + [expr {$filecnt-10}]] + } else { + set label $filecnt + } + set out [open sqlite3-$label.c w] fconfigure $out -translation lf puts -nonewline $out $content close $out |