Annotation of embedaddon/sqlite3/test/tkt3841.test, revision 1.1.1.1

1.1       misho       1: # 2009 May 7
                      2: #
                      3: # The author disclaims copyright to this source code.  In place of
                      4: # a legal notice, here is a blessing:
                      5: #
                      6: #    May you do good and not evil.
                      7: #    May you find forgiveness for yourself and forgive others.
                      8: #    May you share freely, never taking more than you give.
                      9: #
                     10: #***********************************************************************
                     11: #
                     12: # Ticket #3841
                     13: #
                     14: # The sqlite3_aggregate_count() is not being reset when an aggregate
                     15: # functio is used in a correlated subquery.
                     16: #
                     17: set testdir [file dirname $argv0]
                     18: source $testdir/tester.tcl
                     19: 
                     20: ifcapable !subquery {
                     21:   finish_test
                     22:   return
                     23: }
                     24: 
                     25: do_test tkt3841.1 {
                     26:   execsql {
                     27:     CREATE TABLE table2 (key TEXT, x TEXT);
                     28:     CREATE TABLE list (key TEXT, value TEXT);
                     29:   
                     30:     INSERT INTO table2 VALUES ("a", "alist");
                     31:     INSERT INTO table2 VALUES ("b", "blist");
                     32:     INSERT INTO list VALUES ("a", 1);
                     33:     INSERT INTO list VALUES ("a", 2);
                     34:     INSERT INTO list VALUES ("a", 3);
                     35:     INSERT INTO list VALUES ("b", 4);
                     36:     INSERT INTO list VALUES ("b", 5);
                     37:     INSERT INTO list VALUES ("b", 6);
                     38: 
                     39:     SELECT
                     40:       table2.x,
                     41:       (SELECT group_concat(list.value)
                     42:         FROM list
                     43:         WHERE list.key = table2.key)
                     44:     FROM table2;
                     45:   }
                     46: } {alist 1,2,3 blist 4,5,6}
                     47: 
                     48: finish_test

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>