| Index: third_party/sqlite/sqlite-src-3100200/tool/mkopcodec.tcl
|
| diff --git a/third_party/sqlite/sqlite-src-3100200/tool/mkopcodec.tcl b/third_party/sqlite/sqlite-src-3100200/tool/mkopcodec.tcl
|
| deleted file mode 100644
|
| index 55d828b14df45747fb753f4aee170a957f4bbb3f..0000000000000000000000000000000000000000
|
| --- a/third_party/sqlite/sqlite-src-3100200/tool/mkopcodec.tcl
|
| +++ /dev/null
|
| @@ -1,50 +0,0 @@
|
| -#!/usr/bin/tclsh
|
| -#
|
| -# This TCL script scans the opcodes.h file (which is itself generated by
|
| -# another TCL script) and uses the information gleaned to create the
|
| -# opcodes.c source file.
|
| -#
|
| -# Opcodes.c contains strings which are the symbolic names for the various
|
| -# opcodes used by the VDBE. These strings are used when disassembling a
|
| -# VDBE program during tracing or as a result of the EXPLAIN keyword.
|
| -#
|
| -puts "/* Automatically generated. Do not edit */"
|
| -puts "/* See the tool/mkopcodec.tcl script for details. */"
|
| -puts "#if !defined(SQLITE_OMIT_EXPLAIN) \\"
|
| -puts " || defined(VDBE_PROFILE) \\"
|
| -puts " || defined(SQLITE_DEBUG)"
|
| -puts "#if defined(SQLITE_ENABLE_EXPLAIN_COMMENTS) || defined(SQLITE_DEBUG)"
|
| -puts "# define OpHelp(X) \"\\0\" X"
|
| -puts "#else"
|
| -puts "# define OpHelp(X)"
|
| -puts "#endif"
|
| -puts "const char *sqlite3OpcodeName(int i)\173"
|
| -puts " static const char *const azName\[\] = \173 \"?\","
|
| -set mx 0
|
| -
|
| -set in [open [lindex $argv 0] rb]
|
| -while {![eof $in]} {
|
| - set line [gets $in]
|
| - if {[regexp {^#define OP_} $line]} {
|
| - set name [lindex $line 1]
|
| - regsub {^OP_} $name {} name
|
| - set i [lindex $line 2]
|
| - set label($i) $name
|
| - if {$mx<$i} {set mx $i}
|
| - if {[regexp {synopsis: (.*) \*/} $line all x]} {
|
| - set synopsis($i) [string trim $x]
|
| - } else {
|
| - set synopsis($i) {}
|
| - }
|
| - }
|
| -}
|
| -close $in
|
| -
|
| -for {set i 1} {$i<=$mx} {incr i} {
|
| - puts [format " /* %3d */ %-18s OpHelp(\"%s\")," \
|
| - $i \"$label($i)\" $synopsis($i)]
|
| -}
|
| -puts " \175;"
|
| -puts " return azName\[i\];"
|
| -puts "\175"
|
| -puts "#endif"
|
|
|