Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Add some missing 'SQLiteInterop' test constraints. |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
04dcf6e006a6f730e2c65b94c04a472d |
User & Date: | mistachkin 2018-07-24 00:24:43.590 |
Context
2018-07-24
| ||
01:49 | Update master release archive manifest again. check-in: 456170f5fe user: mistachkin tags: trunk | |
00:24 | Add some missing 'SQLiteInterop' test constraints. check-in: 04dcf6e006 user: mistachkin tags: trunk | |
2018-07-23
| ||
07:00 | Cosmetic changes to whitespace and comments. check-in: febb90f95a user: mistachkin tags: trunk | |
Changes
Changes to Tests/basic.eagle.
︙ | ︙ | |||
4695 4696 4697 4698 4699 4700 4701 | unset -nocomplain blob unset -nocomplain dataReader cleanupDb $fileName unset -nocomplain result sql db fileName } -constraints {eagle command.object monoBug28 command.sql compile.DATA SQLite\ | | | 4695 4696 4697 4698 4699 4700 4701 4702 4703 4704 4705 4706 4707 4708 4709 | unset -nocomplain blob unset -nocomplain dataReader cleanupDb $fileName unset -nocomplain result sql db fileName } -constraints {eagle command.object monoBug28 command.sql compile.DATA SQLite\ System.Data.SQLite SQLiteInterop} -result {9 18}} ############################################################################### runTest {test data-1.90 {stmt extension / 'sqlite_stmt' virtual table} -setup { setupDb [set fileName data-1.90.db] } -body { sql execute $db { |
︙ | ︙ |
Changes to Tests/tkt-17045010df.eagle.
︙ | ︙ | |||
52 53 54 55 56 57 58 | unset -nocomplain result connection cleanupDb $fileName unset -nocomplain db fileName } -constraints {eagle command.object monoBug28\ defineConstant.System.Data.SQLite.INTEROP_TEST_EXTENSION command.sql\ | | | | 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 | unset -nocomplain result connection cleanupDb $fileName unset -nocomplain db fileName } -constraints {eagle command.object monoBug28\ defineConstant.System.Data.SQLite.INTEROP_TEST_EXTENSION command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop} -match regexp -result \ {^\{0 \{\}\} \{1 \{EXCEPTION System\.Data\.SQLite\.SQLiteException\ System\.Data\.SQLite\.SQLite3\.LoadExtension\} \{SQL logic error( or missing\ database)? -- not authorized\}\} \{1 \{EXCEPTION\ System\.Data\.SQLite\.SQLiteException System\.Data\.SQLite\.SQLite3\.Prepare\}\ \{SQL logic error( or missing database)? -- no such function: interopTest\}\}\ \{1 \{EXCEPTION System\.Data\.SQLite\.SQLiteException\ System\.Data\.SQLite\.SQLite3\.Prepare\} \{SQL logic error( or missing\ database)? -- no such function: interopTest\}\} \{0 \{\}\} \{0 \{\}\} \{0\ |
︙ | ︙ |
Changes to Tests/tkt-85b824b736.eagle.
︙ | ︙ | |||
127 128 129 130 131 132 133 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] $result } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] $result } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [string map [list \n \r\n] {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{0 2 \{one-string\ two-string\}\}$}]} ############################################################################### |
︙ | ︙ | |||
246 247 248 249 250 251 252 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] $result } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] $result } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [string map [list \n \r\n] {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{0 2 111 110 101 45 98 108\ 111 98 116 119 111 45 98 108 111 98\}$}]} ############################################################################### runSQLiteTestEpilogue runTestEpilogue |
Changes to Tests/vtab.eagle.
︙ | ︙ | |||
110 111 112 113 114 115 116 | object invoke _Dynamic${id}.Test${id} Main } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 | object invoke _Dynamic${id}.Test${id} Main } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{\}$}]} ############################################################################### runTest {test vtab-1.2.1 {IEnumerable virtual table} -setup { |
︙ | ︙ | |||
216 217 218 219 220 221 222 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{one two three 4 5\.0 Error\ \{SQL logic error( or missing database)? -- virtual table "t\d+" is\ read-only\}\}$}]} ############################################################################### |
︙ | ︙ | |||
327 328 329 330 331 332 333 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{one two three 4 5\.0 Error\ \{SQL logic error( or missing database)? -- virtual table "t\d+" is\ read-only\}\}$}]} ############################################################################### |
︙ | ︙ | |||
436 437 438 439 440 441 442 | object invoke _Dynamic${id}.Test${id} GetList 1 2 3 4 5 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 | object invoke _Dynamic${id}.Test${id} GetList 1 2 3 4 5 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{1 2 3 4 5 Error \{SQL\ logic error( or missing database)? -- virtual table "t\d+" is read-only\}\}$}]} ############################################################################### |
︙ | ︙ | |||
547 548 549 550 551 552 553 | object invoke _Dynamic${id}.Test${id} GetList 1 2 3 4 5 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 | object invoke _Dynamic${id}.Test${id} GetList 1 2 3 4 5 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{1 2 3 4 5 Error \{SQL\ logic error( or missing database)? -- virtual table "t\d+" is read-only\}\}$}]} ############################################################################### |
︙ | ︙ | |||
798 799 800 801 802 803 804 | object invoke _Dynamic${id}.Test${id} GetList } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 | object invoke _Dynamic${id}.Test${id} GetList } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{\{\} b25l \{SQL logic\ error( or missing database)? -- unable to use function Base64 in the requested\ context\} \{SQL logic error( or missing database)? -- no such function:\ Base65\}\}$}]} |
︙ | ︙ | |||
1051 1052 1053 1054 1055 1056 1057 | object invoke _Dynamic${id}.Test${id} GetList } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 | object invoke _Dynamic${id}.Test${id} GetList } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{\{\} b25l \{SQL logic\ error( or missing database)? -- (?:unable to use function Base64 in the\ requested context|need exactly one argument, got 3)\} \{SQL logic error( or\ missing database)? -- no such function: Base65\}\}$}]} |
︙ | ︙ | |||
1230 1231 1232 1233 1234 1235 1236 | object invoke _Dynamic${id}.Test${id} GetList } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 | object invoke _Dynamic${id}.Test${id} GetList } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{\{\} t\d+ \{\} x\d+\}$}]} ############################################################################### runTest {test vtab-1.7 {virtual table xBestIndex marshalling (1)} -setup { |
︙ | ︙ | |||
1373 1374 1375 1376 1377 1378 1379 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{0 5 two three one 5\.0\ 4 \{ConstraintUsages is OK\}\}$}]} ############################################################################### |
︙ | ︙ | |||
1518 1519 1520 1521 1522 1523 1524 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{0 5 one three\ \{ConstraintUsages is OK\}\}$}]} ############################################################################### |
︙ | ︙ | |||
1597 1598 1599 1600 1601 1602 1603 | object invoke _Dynamic${id}.Test${id} GetSum } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -time true -constraints {eagle command.object monoBug28 monoCrash211\ | | | 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 | object invoke _Dynamic${id}.Test${id} GetSum } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -time true -constraints {eagle command.object monoBug28 monoCrash211\ command.sql compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 (?:-)?\d+$}]} ############################################################################### runTest {test vtab-1.10 {virtual table xRowId uniqueness} -setup { |
︙ | ︙ | |||
1694 1695 1696 1697 1698 1699 1700 | object invoke _Dynamic${id}.Test${id} GetList one one two one two two } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 | object invoke _Dynamic${id}.Test${id} GetList one one two one two two } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{0 4294967296 4294967296\ 8589934592 8589934592 12884901888 12884901888 17179869184 17179869184\ 21474836480 21474836480 25769803776 25769803776\}$}]} ############################################################################### |
︙ | ︙ | |||
1786 1787 1788 1789 1790 1791 1792 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ | | | 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 | object invoke _Dynamic${id}.Test${id} GetList one two three 4 5.0 } result] : [set result ""]}] [normalizeVtabResult $result] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql dataSource id fileName } -constraints {eagle command.object monoBug28 monoCrash211 command.sql\ compile.DATA SQLite System.Data.SQLite SQLiteInterop\ defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE compileCSharp} -match \ regexp -result [normalizeVtabResult {^Ok\ System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{-?\d+ one -?\d+ two -?\d+\ three -?\d+ 4 -?\d+ 5\.0\}$}]} ############################################################################### |
︙ | ︙ | |||
1994 1995 1996 1997 1998 1999 2000 | } unset -nocomplain constraintUsage unset -nocomplain orderBy nOrderBy iOrderBy unset -nocomplain constraint nConstraint iConstraint unset -nocomplain pIndex index } -constraints {eagle command.object monoBug211 SQLite System.Data.SQLite\ | | > | 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 | } unset -nocomplain constraintUsage unset -nocomplain orderBy nOrderBy iOrderBy unset -nocomplain constraint nConstraint iConstraint unset -nocomplain pIndex index } -constraints {eagle command.object monoBug211 SQLite System.Data.SQLite\ SQLiteInterop defineConstant.System.Data.SQLite.INTEROP_VIRTUAL_TABLE} \ -result {}} ############################################################################### rename normalizeVtabResult "" ############################################################################### runSQLiteTestEpilogue runTestEpilogue |