summaryrefslogtreecommitdiff
path: root/chromium/third_party/sqlite/sqlite-src-3240000/tool/replace.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'chromium/third_party/sqlite/sqlite-src-3240000/tool/replace.tcl')
-rw-r--r--chromium/third_party/sqlite/sqlite-src-3240000/tool/replace.tcl23
1 files changed, 0 insertions, 23 deletions
diff --git a/chromium/third_party/sqlite/sqlite-src-3240000/tool/replace.tcl b/chromium/third_party/sqlite/sqlite-src-3240000/tool/replace.tcl
deleted file mode 100644
index 5a1ac5983c4..00000000000
--- a/chromium/third_party/sqlite/sqlite-src-3240000/tool/replace.tcl
+++ /dev/null
@@ -1,23 +0,0 @@
-#!/usr/bin/tcl
-#
-# Replace string with another string -OR- include
-# only lines successfully modified with a regular
-# expression.
-#
-fconfigure stdout -translation binary -encoding binary
-fconfigure stderr -translation binary -encoding binary
-set mode [string tolower [lindex $argv 0]]
-set from [lindex $argv 1]
-set to [lindex $argv 2]
-if {$mode ni [list exact regsub include]} {exit 1}
-if {[string length $from]==0} {exit 2}
-while {![eof stdin]} {
- set line [gets stdin]
- if {[eof stdin]} break
- switch -exact $mode {
- exact {set line [string map [list $from $to] $line]}
- regsub {regsub -all -- $from $line $to line}
- include {if {[regsub -all -- $from $line $to line]==0} continue}
- }
- puts stdout $line
-}