From df16aed36228191b5d385d6ded8537deae605aa9 Mon Sep 17 00:00:00 2001 From: drh Date: Fri, 2 Jun 2000 14:27:22 +0000 Subject: [PATCH] :-) (CVS 38) FossilOrigin-Name: 46c4b792e0a0e61c417f5c1771e013d90d652507 --- manifest | 16 ++++++++-------- manifest.uuid | 2 +- src/main.c | 4 ++-- test/all.test | 16 ++++++++++++---- test/select2.test | 8 ++++++-- 5 files changed, 29 insertions(+), 17 deletions(-) diff --git a/manifest b/manifest index 9f506c2833..8fc50b01bc 100644 --- a/manifest +++ b/manifest @@ -1,5 +1,5 @@ -C :-)\s(CVS\s37) -D 2000-06-02T13:27:59 +C :-)\s(CVS\s38) +D 2000-06-02T14:27:23 F COPYRIGHT 74a8a6531a42e124df07ab5599aad63870fa0bd4 F Makefile.in b0553e870e5daa6279af4dc09101322db16a49f1 F README 51f6a4e7408b34afa5bc1c0485f61b6a4efb6958 @@ -12,7 +12,7 @@ F src/dbbe.h a8a46f71238e0f09f3ec08fd9d1c8c7f4cdc49bf F src/delete.c e11433c14ed5cc8553cba14296b3baa3c23054bc F src/expr.c fb0972a54cc0230b6d4ce02c80ae07d0e1876e01 F src/insert.c 747aad76e48a811c6fd30336514df84104587c3f -F src/main.c e0fb4de58091f7421793e9b93571cf2d64caf3c3 +F src/main.c ed15e0132659ace7f44ea2dbcdd21c232af3dbd5 F src/parse.y 16322c46ec117082ef745715f7a4761f2491a0b2 F src/select.c ce21eb2db2c621c097f03c21ff8d18804fb9897d F src/shell.c bd658f9208bc20ce565c3f687836155772ca939a @@ -25,14 +25,14 @@ F src/util.c c22846f23b9311ca0e68f076686493bac7b20d5d F src/vdbe.c a92f66fa70d1df99ff29795fe8f18e9ea51f8f4c F src/vdbe.h ab574c91c6328c5795f68b84074fbcf860eae70e F src/where.c bed9a8360cbfbf712bdc397c8e22216a5e5f9800 -F test/all.test 66a8a5b8291a472157944edcdce51a320ebd1f35 +F test/all.test 0950c135cab7e60c07bd745ccfad1476211e5bd7 F test/copy.test 641bd3cfaab61c4ee32889587e21e4c70788a97a F test/delete.test 814d53e3b0d2d7069fb17e005d4041454d6585d4 F test/expr.test f3fc925935533082911dfa5fde9b22e382b3132f F test/index.test 8d4f26901a5582daa353fe3c8266cbf4a53af830 F test/insert.test 161bc67a4189738c559e3569323ceae31f4d49d6 F test/select1.test a0b00df77e85adff75c338e487718c5d31f69e3a -F test/select2.test 33a53530dc011bcf970068f79674b2272fda5917 +F test/select2.test 4a86ab6dcf166aec2bc6d8c0762103916c6c90c3 F test/table.test 85d6f410d127ec508c6640f02d7c40d218414e81 F test/tester.tcl 44690d463c1dc83a4c76ccde07cc146a988600f6 F test/update.test 69459302ea75cafac1479e60b0e36efb88123c0e @@ -46,7 +46,7 @@ F www/c_interface.tcl 8867d76ddd416d2fbd41e4cb3de8efa9cef105a5 F www/changes.tcl 7d6ed774362dea0c9687d4efbafd939c1c48fd81 F www/index.tcl 95bab9c95813c2222265532e4e0340a8c1d4e354 F www/sqlite.tcl 2f933ce18cffd34a0a020a82435ab937137970fd -P 80d925b82b176df7f73a1747a6ed711ac3d9a0d3 -R e8a51bd00aae9034f42802ab343d2bb5 +P 2b55f9b790e2914bbd2fd27ef23bbab79fa76937 +R bb17a885c77051981ec6ed823290ffdd U drh -Z aaac793e5f9c2c3602d5040dcac36c63 +Z 8068067c5c6d0589ad45c58c2c0a0852 diff --git a/manifest.uuid b/manifest.uuid index 9aea99ffb5..caf0b8cb23 100644 --- a/manifest.uuid +++ b/manifest.uuid @@ -1 +1 @@ -2b55f9b790e2914bbd2fd27ef23bbab79fa76937 \ No newline at end of file +46c4b792e0a0e61c417f5c1771e013d90d652507 \ No newline at end of file diff --git a/src/main.c b/src/main.c index 6b348a86cd..6fae4df946 100644 --- a/src/main.c +++ b/src/main.c @@ -26,7 +26,7 @@ ** other files are for internal use by SQLite and should not be ** accessed by users of the library. ** -** $Id: main.c,v 1.6 2000/06/02 13:27:59 drh Exp $ +** $Id: main.c,v 1.7 2000/06/02 14:27:23 drh Exp $ */ #include "sqliteInt.h" @@ -185,7 +185,7 @@ sqlite *sqlite_open(const char *zFilename, int mode, char **pzErrMsg){ sqlite_close(db); return 0; }else{ - sqliteFree(pzErrMsg); + sqliteFree(*pzErrMsg); *pzErrMsg = 0; } return db; diff --git a/test/all.test b/test/all.test index 03cefd3240..52f5b93ad7 100644 --- a/test/all.test +++ b/test/all.test @@ -22,16 +22,24 @@ #*********************************************************************** # This file runs all tests. # -# $Id: all.test,v 1.1 2000/05/29 23:48:23 drh Exp $ +# $Id: all.test,v 1.2 2000/06/02 14:27:23 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl rename finish_test really_finish_test proc finish_test {} {} -foreach testfile [lsort -dictionary [glob $testdir/*.test]] { - if {[file tail $testfile]=="all.test"} continue - source $testfile +if {[file exists ./sqlite_test_count]} { + set COUNT [exec cat ./sqlite_test_count] +} else { + set COUNT 1 +} + +for {set Counter 0} {$Counter<$COUNT} {incr Counter} { + foreach testfile [lsort -dictionary [glob $testdir/*.test]] { + if {[file tail $testfile]=="all.test"} continue + source $testfile + } } really_finish_test diff --git a/test/select2.test b/test/select2.test index 3e6fdd63ea..6dc71495b5 100644 --- a/test/select2.test +++ b/test/select2.test @@ -23,15 +23,19 @@ # This file implements regression tests for SQLite library. The # focus of this file is testing the SELECT statement. # -# $Id: select2.test,v 1.1 2000/06/02 13:28:16 drh Exp $ +# $Id: select2.test,v 1.2 2000/06/02 14:27:23 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl execsql {CREATE TABLE tbl1(f1 int, f2 int)} +set f [open ./testdata1.txt w] for {set i 0} {$i<=30} {incr i} { - execsql "INSERT INTO tbl1 VALUES([expr {$i%9}],[expr {$i%10}])" + puts $f "[expr {$i%9}]\t[expr {$i%10}]\n" } +close $f +execsql {COPY tbl1 FROM './testdata1.txt'} +# file delete -force ./testdata1.txt # Do a second query inside a first. #