Annotation of embedaddon/sqlite3/test/tkt3922.test, revision 1.1
1.1 ! misho 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.2 2009/06/26 14:17:47 shane 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
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>