Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Fix the name of the source algorithm in the comments of the script generators for the recently checked-in test cases for integer boundary-value testing. (CVS 6026) |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
adba0f3c01ba2407466d0120c411c398 |
User & Date: | drh 2008-12-14 02:55:16.000 |
Context
2008-12-14
| ||
14:45 | Add the example from #3359 to the test suite. (CVS 6027) (check-in: 84f8417c07 user: danielk1977 tags: trunk) | |
02:55 | Fix the name of the source algorithm in the comments of the script generators for the recently checked-in test cases for integer boundary-value testing. (CVS 6026) (check-in: adba0f3c01 user: drh tags: trunk) | |
2008-12-12
| ||
19:19 | Add many new integer boundary value tests. Ticket #3536. (CVS 6025) (check-in: 45277238d3 user: drh tags: trunk) | |
Changes
Changes to test/boundary1.tcl.
︙ | ︙ | |||
9 10 11 12 13 14 15 | # #*********************************************************************** # This file implements regression tests for SQLite library. # # This file is automatically generated from a separate TCL script. # This file seeks to exercise integer boundary values. # | | | 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | # #*********************************************************************** # This file implements regression tests for SQLite library. # # This file is automatically generated from a separate TCL script. # This file seeks to exercise integer boundary values. # # $Id: boundary1.tcl,v 1.2 2008/12/14 02:55:16 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl } expr srand(0) |
︙ | ︙ | |||
61 62 63 64 65 66 67 | set outlist {} foreach x $y { lappend outlist [lindex $x 1] } return $outlist } | | | 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 | set outlist {} foreach x $y { lappend outlist [lindex $x 1] } return $outlist } # A simple selection sort. Not trying to be efficient. # proc sort {inlist} { set outlist {} set mn [lindex $inlist 0] foreach x $inlist { if {$x<$mn} {set mn $x} } |
︙ | ︙ |
Changes to test/boundary2.tcl.
︙ | ︙ | |||
9 10 11 12 13 14 15 | # #*********************************************************************** # This file implements regression tests for SQLite library. # # This file is automatically generated from a separate TCL script. # This file seeks to exercise integer boundary values. # | | | 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | # #*********************************************************************** # This file implements regression tests for SQLite library. # # This file is automatically generated from a separate TCL script. # This file seeks to exercise integer boundary values. # # $Id: boundary2.tcl,v 1.2 2008/12/14 02:55:16 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl } expr srand(0) |
︙ | ︙ | |||
61 62 63 64 65 66 67 | set outlist {} foreach x $y { lappend outlist [lindex $x 1] } return $outlist } | | | 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 | set outlist {} foreach x $y { lappend outlist [lindex $x 1] } return $outlist } # A simple selection sort. Not trying to be efficient. # proc sort {inlist} { set outlist {} set mn [lindex $inlist 0] foreach x $inlist { if {$x<$mn} {set mn $x} } |
︙ | ︙ |
Changes to test/boundary3.tcl.
︙ | ︙ | |||
9 10 11 12 13 14 15 | # #*********************************************************************** # This file implements regression tests for SQLite library. # # This file is automatically generated from a separate TCL script. # This file seeks to exercise integer boundary values. # | | | 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | # #*********************************************************************** # This file implements regression tests for SQLite library. # # This file is automatically generated from a separate TCL script. # This file seeks to exercise integer boundary values. # # $Id: boundary3.tcl,v 1.2 2008/12/14 02:55:16 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl } expr srand(0) |
︙ | ︙ | |||
61 62 63 64 65 66 67 | set outlist {} foreach x $y { lappend outlist [lindex $x 1] } return $outlist } | | | 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 | set outlist {} foreach x $y { lappend outlist [lindex $x 1] } return $outlist } # A simple selection sort. Not trying to be efficient. # proc sort {inlist} { set outlist {} set mn [lindex $inlist 0] foreach x $inlist { if {$x<$mn} {set mn $x} } |
︙ | ︙ |
Changes to test/boundary4.tcl.
︙ | ︙ | |||
9 10 11 12 13 14 15 | # #*********************************************************************** # This file implements regression tests for SQLite library. # # This file is automatically generated from a separate TCL script. # This file seeks to exercise integer boundary values. # | | | 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | # #*********************************************************************** # This file implements regression tests for SQLite library. # # This file is automatically generated from a separate TCL script. # This file seeks to exercise integer boundary values. # # $Id: boundary4.tcl,v 1.2 2008/12/14 02:55:16 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl } expr srand(0) |
︙ | ︙ | |||
59 60 61 62 63 64 65 | set outlist {} foreach x $y { lappend outlist [lindex $x 1] } return $outlist } | | | 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 | set outlist {} foreach x $y { lappend outlist [lindex $x 1] } return $outlist } # A simple selection sort. Not trying to be efficient. # proc sort {inlist} { set outlist {} set mn [lindex $inlist 0] foreach x $inlist { if {$x<$mn} {set mn $x} } |
︙ | ︙ |