| Index: third_party/sqlite/src/test/nan.test
|
| diff --git a/third_party/sqlite/src/test/nan.test b/third_party/sqlite/src/test/nan.test
|
| index 25672cb24f71e66fae5b992378f332ddff07d076..0e9462fcb5cfd0b822ff19e0b3a605f2163db9b8 100644
|
| --- a/third_party/sqlite/src/test/nan.test
|
| +++ b/third_party/sqlite/src/test/nan.test
|
| @@ -24,6 +24,11 @@
|
| set testdir [file dirname $argv0]
|
| source $testdir/tester.tcl
|
|
|
| +# Do not use a codec for tests in this file, as the database file is
|
| +# manipulated directly using tcl scripts (using the [hexio_write] command).
|
| +#
|
| +do_not_use_codec
|
| +
|
| do_test nan-1.1.1 {
|
| db eval {
|
| PRAGMA auto_vacuum=OFF;
|
| @@ -61,13 +66,13 @@ if {$tcl_platform(platform) != "symbian"} {
|
| sqlite3_reset $::STMT
|
| db eval {SELECT x, typeof(x) FROM t1}
|
| } {{} null inf real -inf real {} null {} null}
|
| - do_test nan-1.1.5 {
|
| + do_test nan-1.1.6 {
|
| sqlite3_bind_double $::STMT 1 -NaN0
|
| sqlite3_step $::STMT
|
| sqlite3_reset $::STMT
|
| db eval {SELECT x, typeof(x) FROM t1}
|
| } {{} null inf real -inf real {} null {} null {} null}
|
| - do_test nan-1.1.6 {
|
| + do_test nan-1.1.7 {
|
| db eval {
|
| UPDATE t1 SET x=x-x;
|
| SELECT x, typeof(x) FROM t1;
|
| @@ -115,13 +120,13 @@ do_test nan-1.2.5 {
|
| sqlite3_reset $::STMT
|
| db eval {SELECT CAST(x AS text), typeof(x) FROM t1}
|
| } {{} null Inf real -Inf real {} null {} null}
|
| -do_test nan-1.2.5 {
|
| +do_test nan-1.2.6 {
|
| sqlite3_bind_double $::STMT 1 -NaN0
|
| sqlite3_step $::STMT
|
| sqlite3_reset $::STMT
|
| db eval {SELECT CAST(x AS text), typeof(x) FROM t1}
|
| } {{} null Inf real -Inf real {} null {} null {} null}
|
| -do_test nan-1.2.6 {
|
| +do_test nan-1.2.7 {
|
| db eval {
|
| UPDATE t1 SET x=x-x;
|
| SELECT CAST(x AS text), typeof(x) FROM t1;
|
| @@ -248,23 +253,23 @@ do_test nan-4.10 {
|
| db eval {SELECT CAST(x AS text), typeof(x) FROM t1}
|
| } {-Inf real}
|
|
|
| -do_test nan-4.10 {
|
| +do_test nan-4.11 {
|
| db eval {DELETE FROM t1}
|
| db eval "INSERT INTO t1 VALUES(1234.5[string repeat 0 10000]12345)"
|
| db eval {SELECT x, typeof(x) FROM t1}
|
| } {1234.5 real}
|
| -do_test nan-4.11 {
|
| +do_test nan-4.12 {
|
| db eval {DELETE FROM t1}
|
| db eval "INSERT INTO t1 VALUES(-1234.5[string repeat 0 10000]12345)"
|
| db eval {SELECT x, typeof(x) FROM t1}
|
| } {-1234.5 real}
|
| -do_test nan-4.12 {
|
| +do_test nan-4.13 {
|
| db eval {DELETE FROM t1}
|
| set small [string repeat 0 10000].[string repeat 0 324][string repeat 9 10000]
|
| db eval "INSERT INTO t1 VALUES($small)"
|
| db eval {SELECT x, typeof(x) FROM t1}
|
| } {0.0 real}
|
| -do_test nan-4.13 {
|
| +do_test nan-4.14 {
|
| db eval {DELETE FROM t1}
|
| set small \
|
| -[string repeat 0 10000].[string repeat 0 324][string repeat 9 10000]
|
| @@ -279,14 +284,14 @@ if {$tcl_platform(platform) != "symbian"} {
|
| # the very small numbers back to text form (probably due to a difference
|
| # in the sprintf() implementation).
|
| #
|
| - do_test nan-4.14 {
|
| + do_test nan-4.15 {
|
| db eval {DELETE FROM t1}
|
| set small \
|
| [string repeat 0 10000].[string repeat 0 323][string repeat 9 10000]
|
| db eval "INSERT INTO t1 VALUES($small)"
|
| db eval {SELECT x, typeof(x) FROM t1}
|
| } {9.88131291682493e-324 real}
|
| - do_test nan-4.15 {
|
| + do_test nan-4.16 {
|
| db eval {DELETE FROM t1}
|
| set small \
|
| -[string repeat 0 10000].[string repeat 0 323][string repeat 9 10000]
|
| @@ -294,13 +299,13 @@ if {$tcl_platform(platform) != "symbian"} {
|
| db eval {SELECT x, typeof(x) FROM t1}
|
| } {-9.88131291682493e-324 real}
|
| }
|
| -do_test nan-4.16 {
|
| +do_test nan-4.17 {
|
| db eval {DELETE FROM t1}
|
| set small [string repeat 0 10000].[string repeat 0 323][string repeat 9 10000]
|
| db eval "INSERT INTO t1 VALUES($small)"
|
| db eval {SELECT CAST(x AS text), typeof(x) FROM t1}
|
| } {9.88131291682493e-324 real}
|
| -do_test nan-4.17 {
|
| +do_test nan-4.18 {
|
| db eval {DELETE FROM t1}
|
| set small \
|
| -[string repeat 0 10000].[string repeat 0 323][string repeat 9 10000]
|
|
|