Annotation of embedaddon/sqlite3/test/tkt3508.test, revision 1.1.1.1
1.1 misho 1: # 2008 November 22
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: # This file implements regression tests for SQLite library.
12: #
13: # $Id: tkt3508.test,v 1.5 2009/05/28 01:00:56 drh Exp $
14:
15: set testdir [file dirname $argv0]
16: source $testdir/tester.tcl
17:
18: do_test tkt3508-1.1 {
19: catchsql {
20: CREATE TABLE modificationsTmp (
21: SUBSTRATE_HPRD_ID VARCHAR(80),
22: SUBSTRATE_GENE_SYMBOL VARCHAR(80),
23: SUBSTRATE_ISOFORM_ID VARCHAR(80),
24: SUBSTRATE_REFSEQ_ID VARCHAR(80),
25: SITE INTEGER,
26: RESIDUE VARCHAR(80),
27: ENZYME_NAME VARCHAR(80),
28: ENZYME_HPRD_ID VARCHAR(80),
29: MODIFICATION_TYPE VARCHAR(80),
30: EXPERIMENT_TYPE VARCHAR(80),
31: REFERENCE_ID VARCHAR(80)
32: );
33: select SUBSTRATE_HPRD_ID, count(substrate_refseq_id) as c
34: from modificationsTmp where c > 1 group by SUBSTRATE_HPRD_ID;
35: }
36: } {1 {misuse of aggregate: count()}}
37:
38: finish_test
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>