mirror of
https://github.com/tursodatabase/limbo.git
synced 2025-07-07 12:35:00 +00:00
18 lines
673 B
Tcl
Executable file
18 lines
673 B
Tcl
Executable file
#!/usr/bin/env tclsh
|
|
|
|
set testdir [file dirname $argv0]
|
|
source $testdir/tester.tcl
|
|
|
|
if {[info exists ::env(SQLITE_EXEC)] && ($::env(SQLITE_EXEC) eq "scripts/limbo-sqlite3-index-experimental" || $::env(SQLITE_EXEC) eq "sqlite3")} {
|
|
do_execsql_test_in_memory_any_error create_table_one_unique_set {
|
|
CREATE TABLE t4(a, unique(b));
|
|
}
|
|
|
|
do_execsql_test_on_specific_db {:memory:} create_table_same_uniques_and_primary_keys {
|
|
CREATE TABLE t2(a,b, unique(a,b), primary key(a,b));
|
|
} {}
|
|
|
|
do_execsql_test_on_specific_db {:memory:} create_table_unique_contained_in_primary_keys {
|
|
CREATE TABLE t4(a,b, primary key(a,b), unique(a));
|
|
} {}
|
|
}
|