Added the "memory:" driver (CVS 158)
FossilOrigin-Name: 54d60c68dc83410e911b828a680772541c44e9df
This commit is contained in:
drh
parent
e907bfc2ac
commit
767c2001c6
@ -47,7 +47,7 @@ LIBREADLINE = @TARGET_READLINE_LIBS@
|
||||
|
||||
# Object files for the SQLite library.
|
||||
#
|
||||
LIBOBJ = build.o dbbe.o dbbegdbm.o delete.o expr.o insert.o \
|
||||
LIBOBJ = build.o dbbe.o dbbegdbm.o dbbemem.o delete.o expr.o insert.o \
|
||||
main.o parse.o printf.o select.o table.o tokenize.o update.o \
|
||||
util.o vdbe.o where.o tclsqlite.o
|
||||
|
||||
@ -57,6 +57,7 @@ SRC = \
|
||||
$(TOP)/src/build.c \
|
||||
$(TOP)/src/dbbe.c \
|
||||
$(TOP)/src/dbbegdbm.c \
|
||||
$(TOP)/src/dbbemem.c \
|
||||
$(TOP)/src/dbbe.h \
|
||||
$(TOP)/src/dbbemem.c \
|
||||
$(TOP)/src/delete.c \
|
||||
@ -122,6 +123,9 @@ dbbe.o: $(TOP)/src/dbbe.c $(HDR)
|
||||
dbbegdbm.o: $(TOP)/src/dbbegdbm.c $(HDR)
|
||||
$(TCC) $(GDBM_FLAGS) -c $(TOP)/src/dbbegdbm.c
|
||||
|
||||
dbbemem.o: $(TOP)/src/dbbemem.c $(HDR)
|
||||
$(TCC) $(GDBM_FLAGS) -c $(TOP)/src/dbbemem.c
|
||||
|
||||
main.o: $(TOP)/src/main.c $(HDR)
|
||||
$(TCC) $(GDBM_FLAGS) -c $(TOP)/src/main.c
|
||||
|
||||
|
||||
34
manifest
34
manifest
@ -1,17 +1,17 @@
|
||||
C Version\s1.0.13\s(CVS\s490)
|
||||
D 2000-10-19T02:00:00
|
||||
C Added\sthe\s"memory:"\sdriver\s(CVS\s158)
|
||||
D 2000-10-19T14:10:08
|
||||
F COPYRIGHT 74a8a6531a42e124df07ab5599aad63870fa0bd4
|
||||
F Makefile.in e52c865acc544f539820b2c3efad5af6e6a0c533
|
||||
F Makefile.in 0b1fdafa55e1bf4d3a4f5213544130e66ef32052
|
||||
F README 51f6a4e7408b34afa5bc1c0485f61b6a4efb6958
|
||||
F VERSION 8029dd7a9837bd0f6a598758411f7b68ecc8d433
|
||||
F VERSION 9c65d78e59cfa4cd1ee3aab6a1775f71371a5996
|
||||
F configure 3dc1edb9dcf60215e31ff72b447935ab62211442 x
|
||||
F configure.in d892ca33db7e88a055519ce2f36dcb11020e8fff
|
||||
F doc/lemon.html e233a3e97a779c7a87e1bc4528c664a58e49dd47
|
||||
F src/build.c e2ceba852dc45ca899e68a042b29c3daab011575
|
||||
F src/dbbe.c 5f8f9aa18a17e728e604dc48bc435111ce7d4f73
|
||||
F src/dbbe.c 7e01384320075bf1d3e7fb54984df73435908809
|
||||
F src/dbbe.h d175a04b35ea75078274e059dcbcbf7c1262d42a
|
||||
F src/dbbegdbm.c 4ac7222afff0cf91014803f8791740b6da825a2b
|
||||
F src/dbbemem.c eb3d79be7105bd80069815ee499c8e8682876378
|
||||
F src/dbbemem.c ce8f5ce6b93c5f916e3238956b204fccf2cafda3
|
||||
F src/delete.c 4d491eaf61b515516749c7ed68fa3b2ee8a09065
|
||||
F src/expr.c e8e350d7baa33bd9ed8701c159eaba5e912e0adb
|
||||
F src/insert.c f146f149ad2422a1dc3bfa7a1651a25940f98958
|
||||
@ -31,29 +31,29 @@ F src/util.c 811e0ad47f842c16555aaf361b26dab7221c1a6c
|
||||
F src/vdbe.c a876c75429903acb9167b741b0513ef0198f6001
|
||||
F src/vdbe.h 140cdec3c56f70483e169f8ae657bd90f9fd6e98
|
||||
F src/where.c 3dfad2ffd0aa994d5eceac88852f7189c8d1d3c8
|
||||
F test/all.test 0950c135cab7e60c07bd745ccfad1476211e5bd7
|
||||
F test/all.test 4d7a1652fb65cabc6660fedd0ddb138ea78da624
|
||||
F test/copy.test b77a1214bd7756f2849d5c4fa6e715c0ff0c34eb
|
||||
F test/dbbe.test bd2cd9fe84c6d69b6ae42ac5f55b1e940bdca886
|
||||
F test/delete.test 402ee3ccb6e544582d24c573ef70b34d09583ae7
|
||||
F test/expr.test 48273bf48a15d226c35829f702af4254c0ff6795
|
||||
F test/func.test 02aed8845b98bde1043dda97455de1d37238ebb3
|
||||
F test/in.test 2c560c0f55fb777029fd9bb5378f2997582aa603
|
||||
F test/index.test 950be6116122c6e2db7c2c345eabcdb854ced1d0
|
||||
F test/index.test ee060ef8912be47ba616e50cce7985259a68d58a
|
||||
F test/insert.test 66f4c3bd600fec8eb1e733b928cbe6fa885eff0c
|
||||
F test/insert2.test 732405e30331635af8d159fccabe835eea5cd0c6
|
||||
F test/lock.test 4b334f4978cf68321b76f1854b6ee2232e4659e5
|
||||
F test/lock.test f56cf41d29d2c4cbaa6239424b5b0ee844c273a0
|
||||
F test/main.test b7366cc6f3690915a11834bc1090deeff08acaf9
|
||||
F test/select1.test 68ff778c24fc8982e63dda37acb5b0396913adf7
|
||||
F test/select2.test 45c28211702b5c82b06dd624a112ea17417f343c
|
||||
F test/select2.test 0c24b9bb8825ebb96e6cc65f1eb61bace0e02aa0
|
||||
F test/select3.test a9234b8424b6c6d71de534f43b91ade9be68e9cc
|
||||
F test/select4.test cb5374d7c87680e294ac749307459a5cc547609d
|
||||
F test/select5.test e2b9d51d88cbd6c307c2c05b0ef55fe7ba811ac2
|
||||
F test/sort.test d582086c4bb7df3fbf50aa72e69d7e235e9f8e31
|
||||
F test/subselect.test bf8b251a92fb091973c1c469ce499dc9648a41d5
|
||||
F test/table.test 620cd72a6c29da3b9153d15c9e94abbbb282373b
|
||||
F test/tester.tcl ad57d7e8114b0691eb5e943b9dabbd68119b8e2c
|
||||
F test/table.test eaa25951c0f18615763cd3dc248ea4bc38739c05
|
||||
F test/tester.tcl 59edb045efc11478be291182c0455b790c00043a
|
||||
F test/update.test 62f6ce99ff31756aab0ca832ff6d34c5a87b6250
|
||||
F test/vacuum.test 8becf5cfeb897108b35cdd996793e7f1df2f28fd
|
||||
F test/vacuum.test 2127748ff4ddb409212efbb6d9fb9c469ea1b49c
|
||||
F test/where.test bbab5a308055fb6087dc23d600b4ad2b72797397
|
||||
F tool/gdbmdump.c 529e67c78d920606ba196326ea55b57b75fcc82b
|
||||
F tool/lemon.c b13a31798574af881753d38f4da7d505929259c3
|
||||
@ -66,7 +66,7 @@ F www/arch.fig 4f246003b7da23bd63b8b0af0618afb4ee3055c8
|
||||
F www/arch.png 8dae0766d42ed3de9ed013c1341a5792bcf633e6
|
||||
F www/arch.tcl a40380c1fe0080c43e6cc5c20ed70731511b06be
|
||||
F www/c_interface.tcl 1a0b13d056625e4acb59b67edc360cfd9c92ba90
|
||||
F www/changes.tcl 08e23dd0438b5b5ef3a67dbf57e065186343c9be
|
||||
F www/changes.tcl 742f6ab4eeb9b74814169a242b4769b843769506
|
||||
F www/crosscompile.tcl bee79c34f6c3f162ec1c6f5294e79f73651d27ee
|
||||
F www/fileformat.tcl cfb7fba80b7275555281ba2f256c00734bcdd1c9
|
||||
F www/index.tcl b19418d506f90968deef972bf1b427d98bdf13e0
|
||||
@ -76,7 +76,7 @@ F www/opcode.tcl cb3a1abf8b7b9be9f3a228d097d6bf8b742c2b6f
|
||||
F www/sqlite.tcl cb0d23d8f061a80543928755ec7775da6e4f362f
|
||||
F www/tclsqlite.tcl ae101d5f7c07dcc59770e2a84aae09025fab2dad
|
||||
F www/vdbe.tcl bcbfc33bcdd0ebad95eab31286adb9e1bc289520
|
||||
P 979ef5d5d64b8e38cc15fef0d2d507ca2fe6842c
|
||||
R f2349cd3f015fde9fcbd6e3d9e05118d
|
||||
P b9c84fa57912d7d777b4ebefc12627d80a2fc378
|
||||
R e2499a42784d4a08fc7792702e632947
|
||||
U drh
|
||||
Z 01572c0f8e01066746bb3a9054777b1b
|
||||
Z 90f27b216d91b6f176f776431859d864
|
||||
|
||||
@ -1 +1 @@
|
||||
b9c84fa57912d7d777b4ebefc12627d80a2fc378
|
||||
54d60c68dc83410e911b828a680772541c44e9df
|
||||
@ -30,7 +30,7 @@
|
||||
** relatively simple to convert to a different database such
|
||||
** as NDBM, SDBM, or BerkeleyDB.
|
||||
**
|
||||
** $Id: dbbe.c,v 1.20 2000/10/19 01:49:02 drh Exp $
|
||||
** $Id: dbbe.c,v 1.21 2000/10/19 14:10:09 drh Exp $
|
||||
*/
|
||||
#include "sqliteInt.h"
|
||||
|
||||
@ -56,11 +56,9 @@ Dbbe *sqliteDbbeOpen(
|
||||
if( strncmp(zName, "gdbm:", 5)==0 ){
|
||||
return sqliteGdbmOpen(&zName[5], writeFlag, createFlag, pzErrMsg);
|
||||
}
|
||||
#if 0
|
||||
if( strncmp(zName, "memory:", 7)==0 ){
|
||||
extern Dbbe *sqliteMemOpen(const char*,int,int,char**);
|
||||
return sqliteMemOpen(&zName[7], writeFlag, createFlag, pzErrMsg);
|
||||
}
|
||||
#endif
|
||||
return sqliteGdbmOpen(zName, writeFlag, createFlag, pzErrMsg);
|
||||
}
|
||||
|
||||
967
src/dbbemem.c
967
src/dbbemem.c
File diff suppressed because it is too large
Load Diff
@ -22,7 +22,7 @@
|
||||
#***********************************************************************
|
||||
# This file runs all tests.
|
||||
#
|
||||
# $Id: all.test,v 1.2 2000/06/02 14:27:23 drh Exp $
|
||||
# $Id: all.test,v 1.3 2000/10/19 14:10:09 drh Exp $
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
@ -36,6 +36,12 @@ if {[file exists ./sqlite_test_count]} {
|
||||
}
|
||||
|
||||
for {set Counter 0} {$Counter<$COUNT} {incr Counter} {
|
||||
set dbprefix memory:
|
||||
foreach testfile [lsort -dictionary [glob $testdir/*.test]] {
|
||||
if {[file tail $testfile]=="all.test"} continue
|
||||
source $testfile
|
||||
}
|
||||
set dbprefix gdbm:
|
||||
foreach testfile [lsort -dictionary [glob $testdir/*.test]] {
|
||||
if {[file tail $testfile]=="all.test"} continue
|
||||
source $testfile
|
||||
|
||||
@ -23,7 +23,7 @@
|
||||
# This file implements regression tests for SQLite library. The
|
||||
# focus of this file is testing the CREATE INDEX statement.
|
||||
#
|
||||
# $Id: index.test,v 1.7 2000/08/02 13:47:42 drh Exp $
|
||||
# $Id: index.test,v 1.8 2000/10/19 14:10:09 drh Exp $
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
@ -39,12 +39,14 @@ do_test index-1.1b {
|
||||
execsql {SELECT name, sql, tbl_name, type FROM sqlite_master
|
||||
WHERE name='index1'}
|
||||
} {index1 {CREATE INDEX index1 ON test1(f1)} test1 index}
|
||||
skipif memory:
|
||||
do_test index-1.1c {
|
||||
db close
|
||||
sqlite db testdb
|
||||
execsql {SELECT name, sql, tbl_name, type FROM sqlite_master
|
||||
WHERE name='index1'}
|
||||
} {index1 {CREATE INDEX index1 ON test1(f1)} test1 index}
|
||||
skipif memory:
|
||||
do_test index-1.1d {
|
||||
db close
|
||||
sqlite db testdb
|
||||
@ -106,6 +108,7 @@ set r {}
|
||||
for {set i 1} {$i<100} {incr i} {
|
||||
lappend r testdb/index$i.tbl
|
||||
}
|
||||
skipif memory:
|
||||
do_test index-3.2 {
|
||||
execsql {INSERT INTO test1 VALUES(1,2,3,4,5)}
|
||||
lsort -dictionary [glob testdb/index*.tbl]
|
||||
@ -223,6 +226,10 @@ do_test index-7.1 {
|
||||
for {set i 1} {$i<20} {incr i} {
|
||||
execsql "INSERT INTO test1 VALUES($i,[expr {int(pow(2,$i))}])"
|
||||
}
|
||||
execsql {SELECT count(*) FROM test1}
|
||||
} {19}
|
||||
skipif memory:
|
||||
do_test index-7.1b {
|
||||
lsort -dictionary [glob testdb/test1*.tbl]
|
||||
} {testdb/test1.tbl testdb/test1__primary_key.tbl}
|
||||
do_test index-7.2 {
|
||||
|
||||
@ -23,7 +23,9 @@
|
||||
# This file implements regression tests for SQLite library. The
|
||||
# focus of this script is database locks.
|
||||
#
|
||||
# $Id: lock.test,v 1.3 2000/10/16 22:06:43 drh Exp $
|
||||
# $Id: lock.test,v 1.4 2000/10/19 14:10:09 drh Exp $
|
||||
|
||||
if {$dbprefix=="gdbm:"} {
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
@ -99,3 +101,5 @@ catch {exec kill -HUP $::lock_pid}
|
||||
catch {exec kill -9 $::lock_pid}
|
||||
|
||||
finish_test
|
||||
|
||||
}
|
||||
|
||||
@ -23,7 +23,7 @@
|
||||
# This file implements regression tests for SQLite library. The
|
||||
# focus of this file is testing the SELECT statement.
|
||||
#
|
||||
# $Id: select2.test,v 1.8 2000/07/29 13:07:00 drh Exp $
|
||||
# $Id: select2.test,v 1.9 2000/10/19 14:10:09 drh Exp $
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
@ -104,9 +104,16 @@ do_test select2-3.2c {
|
||||
execsql {SELECT f1 FROM tbl2 WHERE f2=1000}
|
||||
} {500}
|
||||
do_test select2-3.2d {
|
||||
execsql {SELECT fcnt() FROM tbl2 WHERE 1000=f2}
|
||||
} {2}
|
||||
do_test select2-3.2e {
|
||||
execsql {SELECT fcnt() FROM tbl2 WHERE f2=1000}
|
||||
} {2}
|
||||
testif gdbm:
|
||||
do_test select2-3.2f {
|
||||
set t1 [lindex [time {execsql {SELECT f1 FROM tbl2 WHERE 1000=f2}} 1] 0]
|
||||
set t2 [lindex [time {execsql {SELECT f1 FROM tbl2 WHERE f2=1000}} 1] 0]
|
||||
expr {$t1*0.8<$t2 && $t2*0.8<$t1}
|
||||
expr {$t1*0.7<$t2 && $t2*0.7<$t1}
|
||||
} {1}
|
||||
|
||||
# Make sure queries run faster with an index than without
|
||||
@ -117,5 +124,8 @@ do_test select2-3.3 {
|
||||
set t2 [lindex [time {execsql {SELECT f1 FROM tbl2 WHERE f2==2000}} 1] 0]
|
||||
expr {$t1*10 < $t2}
|
||||
} {1}
|
||||
do_test select2-3.4 {
|
||||
expr {[execsql {SELECT fcnt() FROM tbl2 WHERE f2==2000}]>10}
|
||||
} {1}
|
||||
|
||||
finish_test
|
||||
|
||||
@ -23,7 +23,7 @@
|
||||
# This file implements regression tests for SQLite library. The
|
||||
# focus of this file is testing the CREATE TABLE statement.
|
||||
#
|
||||
# $Id: table.test,v 1.6 2000/08/02 13:47:43 drh Exp $
|
||||
# $Id: table.test,v 1.7 2000/10/19 14:10:09 drh Exp $
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
@ -49,6 +49,9 @@ do_test table-1.1 {
|
||||
#
|
||||
do_test table-1.2 {
|
||||
execsql {INSERT INTO test1 VALUES('hi', 'y''all')}
|
||||
} {}
|
||||
testif gdbm:
|
||||
do_test table-1.2b {
|
||||
lsort [glob -nocomplain testdb/*.tbl]
|
||||
} {testdb/sqlite_master.tbl testdb/test1.tbl}
|
||||
|
||||
@ -61,6 +64,7 @@ do_test table-1.3 {
|
||||
# Close and reopen the database. Verify that everything is
|
||||
# still the same.
|
||||
#
|
||||
skipif memory:
|
||||
do_test table-1.4 {
|
||||
db close
|
||||
sqlite db testdb
|
||||
@ -76,6 +80,7 @@ do_test table-1.5 {
|
||||
|
||||
# Verify that the file associated with the database is gone.
|
||||
#
|
||||
testif gdbm:
|
||||
do_test table-1.5 {
|
||||
lsort [glob -nocomplain testdb/*.tbl]
|
||||
} {testdb/sqlite_master.tbl}
|
||||
@ -83,6 +88,7 @@ do_test table-1.5 {
|
||||
# Close and reopen the database. Verify that the table is
|
||||
# still gone.
|
||||
#
|
||||
skipif memory:
|
||||
do_test table-1.6 {
|
||||
db close
|
||||
sqlite db testdb
|
||||
@ -121,6 +127,7 @@ do_test table-2.1b {
|
||||
set v [catch {execsql {CREATE TABLE sqlite_master(two text)}} msg]
|
||||
lappend v $msg
|
||||
} {1 {table sqlite_master already exists}}
|
||||
skipif memory:
|
||||
do_test table-2.1c {
|
||||
db close
|
||||
sqlite db testdb
|
||||
@ -138,6 +145,7 @@ do_test table-2.2a {
|
||||
set v [catch {execsql {CREATE TABLE test3(two text)}} msg]
|
||||
lappend v $msg
|
||||
} {1 {there is already an index named test3}}
|
||||
skipif memory:
|
||||
do_test table-2.2b {
|
||||
db close
|
||||
sqlite db testdb
|
||||
@ -198,6 +206,7 @@ do_test table-3.4 {
|
||||
set v [catch {execsql {CREATE TABLE bIg(xyz foo)}} msg]
|
||||
lappend v $msg
|
||||
} {1 {table bIg already exists}}
|
||||
skipif memory:
|
||||
do_test table-3.5 {
|
||||
db close
|
||||
sqlite db testdb
|
||||
@ -226,6 +235,7 @@ do_test table-4.1 {
|
||||
}
|
||||
execsql {SELECT name FROM sqlite_master WHERE type!='meta' ORDER BY name}
|
||||
} $r
|
||||
skipif memory:
|
||||
do_test table-4.1b {
|
||||
db close
|
||||
sqlite db testdb
|
||||
@ -287,6 +297,7 @@ do_test table-5.4 {
|
||||
|
||||
# Create a table with a goofy name
|
||||
#
|
||||
testif gdbm:
|
||||
do_test table-6.1 {
|
||||
execsql {CREATE TABLE 'Spaces In This Name!'(x int)}
|
||||
execsql {INSERT INTO 'spaces in this name!' VALUES(1)}
|
||||
|
||||
@ -23,13 +23,27 @@
|
||||
# This file implements some common TCL routines used for regression
|
||||
# testing the SQLite library
|
||||
#
|
||||
# $Id: tester.tcl,v 1.6 2000/09/21 13:01:37 drh Exp $
|
||||
# $Id: tester.tcl,v 1.7 2000/10/19 14:10:09 drh Exp $
|
||||
|
||||
# Create a test database
|
||||
#
|
||||
file delete -force testdb
|
||||
file mkdir testdb
|
||||
sqlite db testdb
|
||||
if {![info exists dbprefix]} {
|
||||
if {[info exists env(SQLITE_PREFIX)]} {
|
||||
set dbprefix $env(SQLITE_PREFIX):
|
||||
} else {
|
||||
set dbprefix "gdbm:"
|
||||
}
|
||||
}
|
||||
switch $dbprefix {
|
||||
gdbm: {
|
||||
file delete -force testdb
|
||||
file mkdir testdb
|
||||
}
|
||||
memory: {
|
||||
# do nothing
|
||||
}
|
||||
}
|
||||
sqlite db ${dbprefix}testdb
|
||||
|
||||
# Abort early if this script has been run before.
|
||||
#
|
||||
@ -39,12 +53,17 @@ if {[info exists nTest]} return
|
||||
#
|
||||
set nErr 0
|
||||
set nTest 0
|
||||
set skip_test 0
|
||||
|
||||
# Invoke the do_test procedure to run a single test
|
||||
#
|
||||
proc do_test {name cmd expected} {
|
||||
global argv nErr nTest
|
||||
if {[llength $argv]==0} {
|
||||
global argv nErr nTest skip_test
|
||||
if {$skip_test} {
|
||||
set skip_test 0
|
||||
return
|
||||
}
|
||||
if {[llength $argv]==0} {
|
||||
set go 1
|
||||
} else {
|
||||
set go 0
|
||||
@ -57,7 +76,7 @@ proc do_test {name cmd expected} {
|
||||
}
|
||||
if {!$go} return
|
||||
incr nTest
|
||||
puts -nonewline $name...
|
||||
puts -nonewline $::dbprefix$name...
|
||||
flush stdout
|
||||
if {[catch {uplevel #0 "$cmd;\n"} result]} {
|
||||
puts "\nError: $result"
|
||||
@ -70,6 +89,29 @@ proc do_test {name cmd expected} {
|
||||
}
|
||||
}
|
||||
|
||||
# Skip a test based on the dbprefix
|
||||
#
|
||||
proc skipif {args} {
|
||||
foreach a $args {
|
||||
if {$::dbprefix==$a} {
|
||||
set ::skip_test 1
|
||||
return
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
# Run the next test only if the dbprefix is among the listed arguments
|
||||
#
|
||||
proc testif {args} {
|
||||
foreach a $args {
|
||||
if {$::dbprefix==$a} {
|
||||
set ::skip_test 0
|
||||
return
|
||||
}
|
||||
}
|
||||
set ::skip_test 1
|
||||
}
|
||||
|
||||
# Run this routine last
|
||||
#
|
||||
proc finish_test {} {
|
||||
|
||||
@ -23,7 +23,7 @@
|
||||
# This file implements regression tests for SQLite library. The
|
||||
# focus of this file is testing the VACUUM statement.
|
||||
#
|
||||
# $Id: vacuum.test,v 1.1 2000/06/03 18:06:54 drh Exp $
|
||||
# $Id: vacuum.test,v 1.2 2000/10/19 14:10:10 drh Exp $
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
@ -53,6 +53,7 @@ execsql {INSERT INTO test1 VALUES(2)}
|
||||
execsql {INSERT INTO test1 VALUES(3)}
|
||||
execsql {INSERT INTO test2 VALUES(4)}
|
||||
|
||||
testif gdbm:
|
||||
do_test vacuum-1.3 {
|
||||
set b1 [file mtime testdb/test1.tbl]
|
||||
set b2 [file mtime testdb/test2.tbl]
|
||||
@ -64,6 +65,7 @@ do_test vacuum-1.3 {
|
||||
set a3 [file mtime testdb/index1.tbl]
|
||||
expr {$a1>$b1 && $a2==$b2 && $a3==$b3}
|
||||
} {1}
|
||||
testif gdbm:
|
||||
do_test vacuum-1.4 {
|
||||
set b1 [file mtime testdb/test1.tbl]
|
||||
set b2 [file mtime testdb/test2.tbl]
|
||||
|
||||
@ -17,6 +17,11 @@ proc chng {date desc} {
|
||||
puts "<DD><P><UL>$desc</UL></P></DD>"
|
||||
}
|
||||
|
||||
chng {2000 Oct 19 (1.0.14)} {
|
||||
<li>Added a "memory:" backend driver that stores its database in an
|
||||
in-memory hash table.</li>
|
||||
}
|
||||
|
||||
chng {2000 Oct 18 (1.0.13)} {
|
||||
<li>Break out the GDBM driver into a separate file in anticipation
|
||||
to added new drivers.</li>
|
||||
|
||||
Loading…
Reference in New Issue
Block a user