Annotation of embedaddon/sqlite3/test/tkt3838.test, revision 1.1

1.1     ! misho       1: # 2009 May 5
        !             2: #
        !             3: # The author disclaims copyright to this source code.  In place of
        !             4: # a legal notice, here is a blessing:
        !             5: #
        !             6: #    May you do good and not evil.
        !             7: #    May you find forgiveness for yourself and forgive others.
        !             8: #    May you share freely, never taking more than you give.
        !             9: #
        !            10: #***********************************************************************
        !            11: #
        !            12: # Ticket #3838
        !            13: #
        !            14: # The ticket reports that the encoding is UTF8 on the DEFAULT VALUE of
        !            15: # a column added using ALTER TABLE even when the database is UTF16.
        !            16: # Verify that this has been fixed.
        !            17: #
        !            18: # $Id: tkt3838.test,v 1.1 2009/05/05 12:54:50 drh Exp $
        !            19: 
        !            20: set testdir [file dirname $argv0]
        !            21: source $testdir/tester.tcl
        !            22: 
        !            23: ifcapable !altertable {
        !            24:   finish_test
        !            25:   return
        !            26: }
        !            27: 
        !            28: do_realnum_test tkt3838-1.1 {
        !            29:   db eval {
        !            30:     PRAGMA encoding=UTF16;
        !            31:     CREATE TABLE t1(x);
        !            32:     INSERT INTO t1 VALUES(1);
        !            33:     ALTER TABLE t1 ADD COLUMN b INTEGER DEFAULT '999';
        !            34:     ALTER TABLE t1 ADD COLUMN c REAL DEFAULT '9e99';
        !            35:     ALTER TABLE t1 ADD COLUMN d TEXT DEFAULT 'xyzzy';
        !            36:     UPDATE t1 SET x=x+1;
        !            37:     SELECT * FROM t1;
        !            38:   }
        !            39: } {2 999 9e+99 xyzzy}
        !            40: 
        !            41: finish_test

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>