Chromium Code Reviews
chromiumcodereview-hr@appspot.gserviceaccount.com (chromiumcodereview-hr) | Please choose your nickname with Settings | Help | Chromium Project | Gerrit Changes | Sign out
(1)

Unified Diff: third_party/sqlite/sqlite-src-3080704/tool/mkopts.tcl

Issue 2363173002: [sqlite] Remove obsolete reference version 3.8.7.4. (Closed)
Patch Set: Created 4 years, 3 months ago
Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.
Jump to:
View side-by-side diff with in-line comments
Download patch
Index: third_party/sqlite/sqlite-src-3080704/tool/mkopts.tcl
diff --git a/third_party/sqlite/sqlite-src-3080704/tool/mkopts.tcl b/third_party/sqlite/sqlite-src-3080704/tool/mkopts.tcl
deleted file mode 100644
index e3ddcb9eeb378667d3ca11e1487f66d438f1487f..0000000000000000000000000000000000000000
--- a/third_party/sqlite/sqlite-src-3080704/tool/mkopts.tcl
+++ /dev/null
@@ -1,51 +0,0 @@
-#!/usr/bin/tclsh
-#
-# This script is used to generate the array of strings and the enum
-# that appear at the beginning of the C code implementation of a
-# a TCL command and that define the available subcommands for that
-# TCL command.
-
-set prefix {}
-while {![eof stdin]} {
- set line [gets stdin]
- if {$line==""} continue
- regsub -all "\[ \t\n,\]+" [string trim $line] { } line
- foreach token [split $line { }] {
- if {![regexp {(([a-zA-Z]+)_)?([_a-zA-Z]+)} $token all px p2 name]} continue
- lappend namelist [string tolower $name]
- if {$px!=""} {set prefix $p2}
- }
-}
-
-puts " static const char *${prefix}_strs\[\] = \173"
-set col 0
-proc put_item x {
- global col
- if {$col==0} {puts -nonewline " "}
- if {$col<2} {
- puts -nonewline [format " %-21s" $x]
- incr col
- } else {
- puts $x
- set col 0
- }
-}
-proc finalize {} {
- global col
- if {$col>0} {puts {}}
- set col 0
-}
-
-foreach name [lsort $namelist] {
- put_item \"$name\",
-}
-put_item 0
-finalize
-puts " \175;"
-puts " enum ${prefix}_enum \173"
-foreach name [lsort $namelist] {
- regsub -all {@} $name {} name
- put_item ${prefix}_[string toupper $name],
-}
-finalize
-puts " \175;"
« no previous file with comments | « third_party/sqlite/sqlite-src-3080704/tool/mkkeywordhash.c ('k') | third_party/sqlite/sqlite-src-3080704/tool/mkpragmatab.tcl » ('j') | no next file with comments »

Powered by Google App Engine
This is Rietveld 408576698