| OLD | NEW |
| 1 # Run this TCL script to generate thousands of test cases containing | 1 # Run this TCL script to generate thousands of test cases containing |
| 2 # complicated expressions. | 2 # complicated expressions. |
| 3 # | 3 # |
| 4 # The generated tests are intended to verify expression evaluation | 4 # The generated tests are intended to verify expression evaluation |
| 5 # in SQLite against expression evaluation TCL. | 5 # in SQLite against expression evaluation TCL. |
| 6 # | 6 # |
| 7 | 7 |
| 8 # Terms of the $intexpr list each contain two sub-terms. | 8 # Terms of the $intexpr list each contain two sub-terms. |
| 9 # | 9 # |
| 10 # * An SQL expression template | 10 # * An SQL expression template |
| (...skipping 322 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 333 } else { | 333 } else { |
| 334 make_test_case "SELECT $sqle FROM t1 WHERE NOT ($sqlb)" $ans | 334 make_test_case "SELECT $sqle FROM t1 WHERE NOT ($sqlb)" $ans |
| 335 } | 335 } |
| 336 } | 336 } |
| 337 } | 337 } |
| 338 } | 338 } |
| 339 | 339 |
| 340 # Terminate the test script | 340 # Terminate the test script |
| 341 # | 341 # |
| 342 puts {finish_test} | 342 puts {finish_test} |
| OLD | NEW |