| OLD | NEW |
| 1 puts {# 2008 December 11 | 1 puts {# 2008 December 11 |
| 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 320 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 331 | 331 |
| 332 set ans {} | 332 set ans {} |
| 333 foreach x [reverse [sort $all_x]] { | 333 foreach x [reverse [sort $all_x]] { |
| 334 set r $t1xr($x) | 334 set r $t1xr($x) |
| 335 lappend ans $r $t1ra($r) $x | 335 lappend ans $r $t1ra($r) $x |
| 336 } | 336 } |
| 337 maketest 4.13 {SELECT a, rowid, z FROM t1 ORDER BY +z DESC} $ans | 337 maketest 4.13 {SELECT a, rowid, z FROM t1 ORDER BY +z DESC} $ans |
| 338 maketest 4.14 {SELECT a, rowid, z FROM t1 ORDER BY z DESC} $ans | 338 maketest 4.14 {SELECT a, rowid, z FROM t1 ORDER BY z DESC} $ans |
| 339 | 339 |
| 340 puts {finish_test} | 340 puts {finish_test} |
| OLD | NEW |