# 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.tclifcapable 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