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" |