/ Check-in [51eeae7b]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Fix some test script errors in fuzz.test. (CVS 4002)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 51eeae7b7ad5a0fbdd9d4418120dbdb6cd577cd5
User & Date: danielk1977 2007-05-15 07:14:33
Context
2007-05-15
09:00
Do not allow bytes 0x80 through 0xBF to be the first character of an identifer because no valid UTF-8 character can begin with those bytes. If we allowed an identifier to begin with one of those bytes, then the substr() function in ALTER TABLE will not work correctly. (CVS 4003) check-in: 25281042 user: drh tags: trunk
07:14
Fix some test script errors in fuzz.test. (CVS 4002) check-in: 51eeae7b user: danielk1977 tags: trunk
07:00
A fix for queries that used correlated, compound sub-queries in the HAVING clause. Also update fuzz.test some more. (CVS 4001) check-in: da0c1ab4 user: danielk1977 tags: trunk
Changes
Hide Diffs Side-by-Side Diffs Show Whitespace Changes Patch

Changes to test/fuzz.test.

    15     15   #
    16     16   # The tests in this file are really about testing fuzzily generated
    17     17   # SQL parse-trees. The majority of the fuzzily generated SQL is 
    18     18   # valid as far as the parser is concerned. 
    19     19   #
    20     20   # The most complicated trees are for SELECT statements.
    21     21   #
    22         -# $Id: fuzz.test,v 1.11 2007/05/15 07:00:34 danielk1977 Exp $
           22  +# $Id: fuzz.test,v 1.12 2007/05/15 07:14:33 danielk1977 Exp $
    23     23   
    24     24   set testdir [file dirname $argv0]
    25     25   source $testdir/tester.tcl
    26     26   
    27     27   set ::REPEATS 5000
    28         -if {[info exists $::ISQUICK]} {
           28  +if {[info exists ::ISQUICK]} {
    29     29     if {$::ISQUICK} { set ::REPEATS 20 }
    30     30   }
    31     31   
    32     32   proc fuzz {TemplateList} {
    33     33     set n [llength $TemplateList]
    34     34     set i [expr {int(rand()*$n)}]
    35     35     set r [uplevel 1 subst -novar [list [lindex $TemplateList $i]]]
................................................................................
   615    615   integrity_check fuzz-7.3.integrity
   616    616   do_test         fuzz-7.4 {execsql COMMIT} {}
   617    617   integrity_check fuzz-7.5.integrity
   618    618   
   619    619   #----------------------------------------------------------------
   620    620   # Many CREATE and DROP TABLE statements:
   621    621   #
   622         -set E [list table duplicate {no such col} {ambiguous column name}]
          622  +set E [list table duplicate {no such col} {ambiguous column name} {use DROP}]
   623    623   do_fuzzy_test fuzz-8.1 -template {[CreateOrDropTableOrView]} -errorlist $E
   624    624   
   625    625   close $::log
   626    626   finish_test