System.Data.SQLite
Check-in [bba40ece0b]
Not logged in

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

Overview
Comment:Add test case for ticket [754cb60f47].
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | tkt-754cb60f47
Files: files | file ages | folders
SHA1: bba40ece0b746de459731ad49493077c8005049c
User & Date: mistachkin 2016-06-15 19:10:43
References
2016-06-15
19:11 Ticket [754cb60f47] SQLiteDataReader.GetDataTypeName returning empty string on columns with function calls status still Open with 3 other changes artifact: 1e65fae770 user: mistachkin
Context
2016-06-19
06:43
Fix some test constraints. Closed-Leaf check-in: d9a18965fc user: mistachkin tags: tkt-754cb60f47
2016-06-15
19:10
Add test case for ticket [754cb60f47]. check-in: bba40ece0b user: mistachkin tags: tkt-754cb60f47
18:49
Remove a superfluous variable from a test. check-in: d3092d0d87 user: mistachkin tags: trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Added Tests/tkt-754cb60f47.eagle.

            1  +###############################################################################
            2  +#
            3  +# tkt-754cb60f47.eagle --
            4  +#
            5  +# Written by Joe Mistachkin.
            6  +# Released to the public domain, use at your own risk!
            7  +#
            8  +###############################################################################
            9  +
           10  +package require Eagle
           11  +package require Eagle.Library
           12  +package require Eagle.Test
           13  +
           14  +runTestPrologue
           15  +
           16  +###############################################################################
           17  +
           18  +package require System.Data.SQLite.Test
           19  +runSQLiteTestPrologue
           20  +
           21  +###############################################################################
           22  +
           23  +runTest {test tkt-754cb60f47-1.1 {GetDataTypeName w/computed columns} -setup {
           24  +  setupDb [set fileName tkt-754cb60f47-1.1.db]
           25  +} -body {
           26  +  sql execute $db {
           27  +    CREATE TABLE t1(x TEXT, y INTEGER);
           28  +    INSERT INTO t1 (x, y) VALUES('test', 12345);
           29  +  }
           30  +
           31  +  set dataReader [sql execute -execute reader -format datareader -alias $db {
           32  +    SELECT x, y, DATETIME('now') AS w, SUBSTR(x, 1, 2) AS z FROM t1;
           33  +  }]
           34  +
           35  +  $dataReader Read
           36  +
           37  +  list [$dataReader GetName 0] [$dataReader GetName 1] \
           38  +      [$dataReader GetName 2] [$dataReader GetName 3] \
           39  +      [$dataReader GetValue 0] [$dataReader GetValue 1] \
           40  +      [$dataReader GetValue 2] [$dataReader GetValue 3] \
           41  +      [$dataReader GetDataTypeName 0] [$dataReader GetDataTypeName 1] \
           42  +      [$dataReader GetDataTypeName 2] [$dataReader GetDataTypeName 3] \
           43  +      [$dataReader GetFieldType 0] [$dataReader GetFieldType 1] \
           44  +      [$dataReader GetFieldType 2] [$dataReader GetFieldType 3]
           45  +} -cleanup {
           46  +  unset -nocomplain dataReader
           47  +
           48  +  cleanupDb $fileName
           49  +
           50  +  unset -nocomplain db fileName
           51  +} -constraints \
           52  +{eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -match \
           53  +regexp -result {^x y w z test 12345 \{\d{4}-\d{2}-\d{2} \d{2}:\d{2}:\d{2}\} te\
           54  +TEXT INTEGER \{\} \{\} System\.String System\.Int64 System\.String\
           55  +System\.String$}}
           56  +
           57  +###############################################################################
           58  +
           59  +runSQLiteTestEpilogue
           60  +runTestEpilogue