OLD | NEW |
1 # 2008 June 21 | 1 # 2008 June 21 |
2 # | 2 # |
3 # The author disclaims copyright to this source code. In place of | 3 # The author disclaims copyright to this source code. In place of |
4 # a legal notice, here is a blessing: | 4 # a legal notice, here is a blessing: |
5 # | 5 # |
6 # May you do good and not evil. | 6 # May you do good and not evil. |
7 # May you find forgiveness for yourself and forgive others. | 7 # May you find forgiveness for yourself and forgive others. |
8 # May you share freely, never taking more than you give. | 8 # May you share freely, never taking more than you give. |
9 # | 9 # |
10 #*********************************************************************** | 10 #*********************************************************************** |
(...skipping 78 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
89 foreach f [glob -nocomplain $testdir/../ext/rtree/*.test] { | 89 foreach f [glob -nocomplain $testdir/../ext/rtree/*.test] { |
90 lappend alltests $f | 90 lappend alltests $f |
91 } | 91 } |
92 | 92 |
93 if {$::tcl_platform(platform)!="unix"} { | 93 if {$::tcl_platform(platform)!="unix"} { |
94 set alltests [test_set $alltests -exclude crash.test crash2.test] | 94 set alltests [test_set $alltests -exclude crash.test crash2.test] |
95 } | 95 } |
96 set alltests [test_set $alltests -exclude { | 96 set alltests [test_set $alltests -exclude { |
97 all.test async.test quick.test veryquick.test | 97 all.test async.test quick.test veryquick.test |
98 memleak.test permutations.test soak.test fts3.test | 98 memleak.test permutations.test soak.test fts3.test |
99 fts2.test | |
100 mallocAll.test rtree.test | 99 mallocAll.test rtree.test |
101 }] | 100 }] |
102 | 101 |
103 set allquicktests [test_set $alltests -exclude { | 102 set allquicktests [test_set $alltests -exclude { |
104 async2.test async3.test backup_ioerr.test corrupt.test | 103 async2.test async3.test backup_ioerr.test corrupt.test |
105 corruptC.test crash.test crash2.test crash3.test crash4.test crash5.test | 104 corruptC.test crash.test crash2.test crash3.test crash4.test crash5.test |
106 crash6.test crash7.test delete3.test e_fts3.test fts3rnd.test | 105 crash6.test crash7.test delete3.test e_fts3.test fts3rnd.test |
107 fkey_malloc.test fuzz.test fuzz3.test fuzz_malloc.test in2.test loadext.test | 106 fkey_malloc.test fuzz.test fuzz3.test fuzz_malloc.test in2.test loadext.test |
108 misc7.test mutex2.test notify2.test onefile.test pagerfault2.test | 107 misc7.test mutex2.test notify2.test onefile.test pagerfault2.test |
109 savepoint4.test savepoint6.test select9.test | 108 savepoint4.test savepoint6.test select9.test |
(...skipping 740 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
850 if {[info exists ::testspec($suite)]==0} help | 849 if {[info exists ::testspec($suite)]==0} help |
851 set extra "" | 850 set extra "" |
852 if {[llength $argv]>1} { set extra [list -files [lrange $argv 1 end]] } | 851 if {[llength $argv]>1} { set extra [list -files [lrange $argv 1 end]] } |
853 eval run_tests $suite $::testspec($suite) $extra | 852 eval run_tests $suite $::testspec($suite) $extra |
854 } | 853 } |
855 } | 854 } |
856 main $argv | 855 main $argv |
857 finish_test | 856 finish_test |
858 } | 857 } |
859 | 858 |
OLD | NEW |