Return to tkt3922.test CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / sqlite3 / test

sqlite3

    1: # 2009 June 17
    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: # $Id: tkt3922.test,v 1.1.1.1 2012/02/21 17:04:16 misho Exp $
   13: 
   14: set testdir [file dirname $argv0]
   15: source $testdir/tester.tcl
   16: 
   17: if {[working_64bit_int]} {
   18:   do_test tkt3922.1 {
   19:     execsql {
   20:       CREATE TABLE t1(a NUMBER);
   21:       INSERT INTO t1 VALUES('-9223372036854775808');
   22:       SELECT a, typeof(a) FROM t1;
   23:     }
   24:   } {-9223372036854775808 integer}
   25: } else {
   26:   # this alternate version of tkt3922.1 doesn't
   27:   # really test the same thing as the original, 
   28:   # but is needed to create the table and 
   29:   # provided simply as a place holder for 
   30:   # platforms without working 64bit support.
   31:   do_test tkt3922.1 {
   32:     execsql {
   33:       CREATE TABLE t1(a NUMBER);
   34:       INSERT INTO t1 VALUES('-1');
   35:       SELECT a, typeof(a) FROM t1;
   36:     }
   37:   } {-1 integer}
   38: }
   39: do_realnum_test tkt3922.2 {
   40:   execsql {
   41:     DELETE FROM t1;
   42:     INSERT INTO t1 VALUES('-9223372036854775809');
   43:     SELECT a, typeof(a) FROM t1;
   44:   }
   45: } {-9.22337203685478e+18 real}
   46: do_realnum_test tkt3922.3 {
   47:   execsql {
   48:     DELETE FROM t1;
   49:     INSERT INTO t1 VALUES('-9223372036854776832');
   50:     SELECT a, typeof(a) FROM t1;
   51:   }
   52: } {-9.22337203685478e+18 real}
   53: do_realnum_test tkt3922.4 {
   54:   execsql {
   55:     DELETE FROM t1;
   56:     INSERT INTO t1 VALUES('-9223372036854776833');
   57:     SELECT a, typeof(a) FROM t1;
   58:   }
   59: } {-9.22337203685478e+18 real}
   60: if {[working_64bit_int]} {
   61:   do_test tkt3922.5 {
   62:     execsql {
   63:       DELETE FROM t1;
   64:       INSERT INTO t1 VALUES('9223372036854775807');
   65:       SELECT a, typeof(a) FROM t1;
   66:     }
   67:   } {9223372036854775807 integer}
   68: } else {
   69:   # this alternate version of tkt3922.5 doesn't
   70:   # really test the same thing as the original, 
   71:   # but provided simply as a place holder for 
   72:   # platforms without working 64bit support.
   73:   do_test tkt3922.5 {
   74:     execsql {
   75:       DELETE FROM t1;
   76:       INSERT INTO t1 VALUES('1');
   77:       SELECT a, typeof(a) FROM t1;
   78:     }
   79:   } {1 integer}
   80: }
   81: do_realnum_test tkt3922.6 {
   82:   execsql {
   83:     DELETE FROM t1;
   84:     INSERT INTO t1 VALUES('9223372036854775808');
   85:     SELECT a, typeof(a) FROM t1;
   86:   }
   87: } {9.22337203685478e+18 real}
   88: 
   89: finish_test