1 # 2011 March 2 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 # Make sure the rtreenode() testing function can handle entries with 12 # 64-bit rowids. 13 # 14 15 if {![info exists testdir]} { 16 set testdir [file join [file dirname [info script]] .. .. test] 17 } 18 source $testdir/tester.tcl 19 ifcapable !rtree { finish_test ; return } 20 21 do_test rtreeB-1.1 { 22 db eval { 23 CREATE VIRTUAL TABLE t1 USING rtree(ii, x0, y0, x1, y1); 24 INSERT INTO t1 VALUES(1073741824, 0.0, 0.0, 100.0, 100.0); 25 INSERT INTO t1 VALUES(2147483646, 0.0, 0.0, 200.0, 200.0); 26 INSERT INTO t1 VALUES(4294967296, 0.0, 0.0, 300.0, 300.0); 27 INSERT INTO t1 VALUES(8589934592, 20.0, 20.0, 150.0, 150.0); 28 INSERT INTO t1 VALUES(9223372036854775807, 150, 150, 400, 400); 29 SELECT rtreenode(2, data) FROM t1_node; 30 } 31 } {{{1073741824 0.000000 0.000000 100.000000 100.000000} {2147483646 0.000000 0.000000 200.000000 200.000000} {4294967296 0.000000 0.000000 300.000000 300.000000} {8589934592 20.000000 20.000000 150.000000 150.000000} {9223372036854775807 150.000000 150.000000 400.000000 400.000000}}} 32 33 34 finish_test 35