Many problems fixed. Many problems yet to go. (CVS 242)
FossilOrigin-Name: 62c7bd11bcf6438cdcbf66fa67a2bf4ab9d1664d
This commit is contained in:
+1
-18
@@ -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.9 2001/04/12 23:21:59 drh Exp $
|
||||
# $Id: table.test,v 1.10 2001/09/13 21:53:10 drh Exp $
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
@@ -45,15 +45,6 @@ do_test table-1.1 {
|
||||
two text
|
||||
)}}
|
||||
|
||||
# Verify that both table files exists in the database directory
|
||||
#
|
||||
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}
|
||||
|
||||
# Verify the other fields of the sqlite_master file.
|
||||
#
|
||||
@@ -64,7 +55,6 @@ 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
|
||||
@@ -80,7 +70,6 @@ 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}
|
||||
@@ -88,7 +77,6 @@ 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
|
||||
@@ -127,7 +115,6 @@ 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
|
||||
@@ -145,7 +132,6 @@ 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
|
||||
@@ -206,7 +192,6 @@ 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
|
||||
@@ -235,7 +220,6 @@ 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
|
||||
@@ -297,7 +281,6 @@ 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)}
|
||||
|
||||
Reference in New Issue
Block a user