From e36d23a85ebff914d74bb541558c2b6082b78edb Mon Sep 17 00:00:00 2001 From: dan miller Date: Sat, 20 Oct 2007 02:49:29 +0000 Subject: sqlite source (unix build) added to libraries --- .../sqlite/unix/sqlite-3.5.1/test/default.test | 52 ++++++++++++++++++++++ 1 file changed, 52 insertions(+) create mode 100644 libraries/sqlite/unix/sqlite-3.5.1/test/default.test (limited to 'libraries/sqlite/unix/sqlite-3.5.1/test/default.test') diff --git a/libraries/sqlite/unix/sqlite-3.5.1/test/default.test b/libraries/sqlite/unix/sqlite-3.5.1/test/default.test new file mode 100644 index 0000000..9a2ab1a --- /dev/null +++ b/libraries/sqlite/unix/sqlite-3.5.1/test/default.test @@ -0,0 +1,52 @@ +# 2005 August 18 +# +# The author disclaims copyright to this source code. In place of +# a legal notice, here is a blessing: +# +# May you do good and not evil. +# May you find forgiveness for yourself and forgive others. +# May you share freely, never taking more than you give. +# +#************************************************************************* +# This file implements regression tests for SQLite library. The +# focus of this file is testing corner cases of the DEFAULT syntax +# on table definitions. +# +# $Id: default.test,v 1.2 2005/08/20 03:03:04 drh Exp $ +# + +set testdir [file dirname $argv0] +source $testdir/tester.tcl + +ifcapable bloblit { + do_test default-1.1 { + execsql { + CREATE TABLE t1( + a INTEGER, + b BLOB DEFAULT x'6869' + ); + INSERT INTO t1(a) VALUES(1); + SELECT * from t1; + } + } {1 hi} +} +do_test default-1.2 { + execsql { + CREATE TABLE t2( + x INTEGER, + y INTEGER DEFAULT NULL + ); + INSERT INTO t2(x) VALUES(1); + SELECT * FROM t2; + } +} {1 {}} +do_test default-1.3 { + catchsql { + CREATE TABLE t3( + x INTEGER, + y INTEGER DEFAULT (max(x,5)) + ) + } +} {1 {default value of column [y] is not constant}} + +finish_test -- cgit v1.1