OLD | NEW |
| (Empty) |
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 | |
OLD | NEW |