Import SQLite 3.8.7.4.

third_party/sqlite/src/test/enc4.test

Index: third_party/sqlite/src/test/enc4.test
diff --git a/third_party/sqlite/src/test/enc4.test b/third_party/sqlite/src/test/enc4.test
index 0eb55af1aeca341965192ef6b23617c2fd6062d9..94869b6fb75050b9f23fdf7966eefda3cbe1207a 100644
--- a/third_party/sqlite/src/test/enc4.test
+++ b/third_party/sqlite/src/test/enc4.test
@@ -43,7 +43,7 @@ set vals [list\
 set i 1
 foreach enc $encodings {
 
-  file delete -force test.db
+  forcedelete test.db
   sqlite3 db test.db
   db eval "PRAGMA encoding = \"$enc\""
 
@@ -61,19 +61,17 @@ foreach enc $encodings {
       
     set k 1
     foreach val $vals {
-      for {set x 1} {$x<18} {incr x} {
+      for {set x 1} {$x<16} {incr x} {
         set part [expr $init + [string range $val 0 [expr $x-1]]]
-        regsub {e\+0} $part {e+} part
-        regsub {^1e} $part {1.0e} part
 
-        do_test enc4-$i.$j.$k.3.$x {
+        do_realnum_test enc4-$i.$j.$k.3.$x {
           sqlite3_reset $S
           sqlite3_bind_text $S 1 $val $x
           sqlite3_step $S
           sqlite3_column_text $S 0
         } [list $part]
         
-        do_test enc4-$i.$j.$k.4.$x {
+        do_realnum_test enc4-$i.$j.$k.4.$x {
           sqlite3_reset $S
           sqlite3_bind_text16 $S 1 [encoding convertto unicode $val] [expr $x*2]
           sqlite3_step $S
@@ -95,7 +93,7 @@ foreach enc $encodings {
   incr i
 }
 
-file delete -force test.db
+forcedelete test.db
 sqlite3 db test.db
 
 do_test enc4-4.1 {