Artifact
d29cf8c08fcf29ca97f7b9bf074ab75556ea63a3:
- File
Tests/tkt-343d392b51.eagle
— part of check-in
[a272ddc559]
at
2011-10-06 05:33:06
on branch tkt-343d392b51
— Refinements to test case (issue still does not reproduce).
(user:
mistachkin
size: 4067)
0000: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0010: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0020: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0030: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0040: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 0d ###############.
0050: 0a 23 0d 0a 23 20 74 6b 74 2d 33 34 33 64 33 39 .#..# tkt-343d39
0060: 32 62 35 31 2e 65 61 67 6c 65 20 2d 2d 0d 0a 23 2b51.eagle --..#
0070: 0d 0a 23 20 57 72 69 74 74 65 6e 20 62 79 20 4a ..# Written by J
0080: 6f 65 20 4d 69 73 74 61 63 68 6b 69 6e 2e 0d 0a oe Mistachkin...
0090: 23 20 52 65 6c 65 61 73 65 64 20 74 6f 20 74 68 # Released to th
00a0: 65 20 70 75 62 6c 69 63 20 64 6f 6d 61 69 6e 2c e public domain,
00b0: 20 75 73 65 20 61 74 20 79 6f 75 72 20 6f 77 6e use at your own
00c0: 20 72 69 73 6b 21 0d 0a 23 0d 0a 23 23 23 23 23 risk!..#..#####
00d0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
00e0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
00f0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0100: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0110: 23 23 23 23 23 23 23 23 23 23 0d 0a 0d 0a 70 61 ##########....pa
0120: 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 45 61 ckage require Ea
0130: 67 6c 65 0d 0a 70 61 63 6b 61 67 65 20 72 65 71 gle..package req
0140: 75 69 72 65 20 45 61 67 6c 65 4c 69 62 72 61 72 uire EagleLibrar
0150: 79 0d 0a 70 61 63 6b 61 67 65 20 72 65 71 75 69 y..package requi
0160: 72 65 20 45 61 67 6c 65 54 65 73 74 0d 0a 0d 0a re EagleTest....
0170: 72 75 6e 54 65 73 74 50 72 6f 6c 6f 67 75 65 0d runTestPrologue.
0180: 0a 0d 0a 23 23 23 23 23 23 23 23 23 23 23 23 23 ...#############
0190: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
01a0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
01b0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
01c0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
01d0: 23 23 0d 0a 0d 0a 70 61 63 6b 61 67 65 20 72 65 ##....package re
01e0: 71 75 69 72 65 20 53 79 73 74 65 6d 2e 44 61 74 quire System.Dat
01f0: 61 2e 53 51 4c 69 74 65 2e 54 65 73 74 0d 0a 72 a.SQLite.Test..r
0200: 75 6e 53 51 4c 69 74 65 54 65 73 74 50 72 6f 6c unSQLiteTestProl
0210: 6f 67 75 65 0d 0a 0d 0a 23 23 23 23 23 23 23 23 ogue....########
0220: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0230: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0240: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0250: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0260: 23 23 23 23 23 23 23 0d 0a 0d 0a 72 75 6e 54 65 #######....runTe
0270: 73 74 20 7b 74 65 73 74 20 74 6b 74 2d 33 34 33 st {test tkt-343
0280: 64 33 39 32 62 35 31 2d 31 2e 31 20 7b 53 51 4c d392b51-1.1 {SQL
0290: 69 74 65 44 61 74 61 41 64 61 70 74 65 72 20 62 iteDataAdapter b
02a0: 61 74 63 68 20 75 70 64 61 74 65 73 7d 20 2d 73 atch updates} -s
02b0: 65 74 75 70 20 7b 0d 0a 20 20 73 65 74 75 70 44 etup {.. setupD
02c0: 62 20 5b 73 65 74 20 66 69 6c 65 4e 61 6d 65 20 b [set fileName
02d0: 74 6b 74 2d 33 34 33 64 33 39 32 62 35 31 2d 31 tkt-343d392b51-1
02e0: 2e 31 2e 64 62 5d 0d 0a 20 20 73 65 74 20 6f 74 .1.db].. set ot
02f0: 68 65 72 46 69 6c 65 4e 61 6d 65 20 74 6b 74 2d herFileName tkt-
0300: 33 34 33 64 33 39 32 62 35 31 2d 31 2e 31 2d 6f 343d392b51-1.1-o
0310: 74 68 65 72 44 62 2e 64 62 0d 0a 7d 20 2d 62 6f therDb.db..} -bo
0320: 64 79 20 7b 0d 0a 20 20 73 65 74 20 69 64 20 5b dy {.. set id [
0330: 6f 62 6a 65 63 74 20 69 6e 76 6f 6b 65 20 49 6e object invoke In
0340: 74 65 72 70 72 65 74 65 72 2e 47 65 74 41 63 74 terpreter.GetAct
0350: 69 76 65 20 4e 65 78 74 49 64 5d 0d 0a 20 20 73 ive NextId].. s
0360: 65 74 20 64 61 74 61 53 6f 75 72 63 65 20 5b 66 et dataSource [f
0370: 69 6c 65 20 6a 6f 69 6e 20 5b 67 65 74 54 65 6d ile join [getTem
0380: 70 6f 72 61 72 79 50 61 74 68 5d 20 24 66 69 6c poraryPath] $fil
0390: 65 4e 61 6d 65 5d 0d 0a 20 20 73 65 74 20 6f 74 eName].. set ot
03a0: 68 65 72 44 61 74 61 53 6f 75 72 63 65 20 5b 66 herDataSource [f
03b0: 69 6c 65 20 6a 6f 69 6e 20 5b 67 65 74 54 65 6d ile join [getTem
03c0: 70 6f 72 61 72 79 50 61 74 68 5d 20 24 6f 74 68 poraryPath] $oth
03d0: 65 72 46 69 6c 65 4e 61 6d 65 5d 0d 0a 20 20 73 erFileName].. s
03e0: 65 74 20 6f 74 68 65 72 44 62 4e 61 6d 65 20 6f et otherDbName o
03f0: 74 68 65 72 44 62 0d 0a 20 20 73 65 74 20 74 61 therDb.. set ta
0400: 62 6c 65 20 5b 61 70 70 65 6e 64 41 72 67 73 20 ble [appendArgs
0410: 24 6f 74 68 65 72 44 62 4e 61 6d 65 20 2e 74 31 $otherDbName .t1
0420: 5d 0d 0a 0d 0a 20 20 73 65 74 20 73 71 6c 28 31 ].... set sql(1
0430: 29 20 5b 73 75 62 73 74 20 7b 20 5c 0d 0a 20 20 ) [subst { \..
0440: 20 20 41 54 54 41 43 48 20 44 41 54 41 42 41 53 ATTACH DATABAS
0450: 45 20 27 24 7b 6f 74 68 65 72 44 61 74 61 53 6f E '${otherDataSo
0460: 75 72 63 65 7d 27 20 41 53 20 24 7b 6f 74 68 65 urce}' AS ${othe
0470: 72 44 62 4e 61 6d 65 7d 3b 20 5c 0d 0a 20 20 20 rDbName}; \..
0480: 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 24 7b CREATE TABLE ${
0490: 74 61 62 6c 65 7d 28 78 20 49 4e 54 45 47 45 52 table}(x INTEGER
04a0: 20 50 52 49 4d 41 52 59 20 4b 45 59 2c 20 79 29 PRIMARY KEY, y)
04b0: 3b 20 5c 0d 0a 20 20 20 20 5b 66 6f 72 20 7b 73 ; \.. [for {s
04c0: 65 74 20 69 20 31 7d 20 7b 24 69 20 3c 20 32 30 et i 1} {$i < 20
04d0: 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0d 0a 20 0} {incr i} {..
04e0: 20 20 20 20 20 61 70 70 65 6e 64 20 73 71 6c 28 append sql(
04f0: 69 6e 73 65 72 74 73 29 20 5c 0d 0a 20 20 20 20 inserts) \..
0500: 20 20 20 20 20 20 22 49 4e 53 45 52 54 20 49 4e "INSERT IN
0510: 54 4f 20 24 7b 74 61 62 6c 65 7d 20 28 78 2c 20 TO ${table} (x,
0520: 79 29 20 56 41 4c 55 45 53 28 24 69 2c 20 27 24 y) VALUES($i, '$
0530: 69 27 29 3b 20 22 0d 0a 20 20 20 20 7d 3b 20 72 i'); ".. }; r
0540: 65 74 75 72 6e 20 5b 65 78 70 72 20 7b 5b 69 6e eturn [expr {[in
0550: 66 6f 20 65 78 69 73 74 73 20 73 71 6c 28 69 6e fo exists sql(in
0560: 73 65 72 74 73 29 5d 20 3f 20 24 73 71 6c 28 69 serts)] ? $sql(i
0570: 6e 73 65 72 74 73 29 20 3a 20 22 22 7d 5d 5d 20 nserts) : ""}]]
0580: 5c 0d 0a 20 20 7d 5d 0d 0a 0d 0a 20 20 73 65 74 \.. }].... set
0590: 20 73 71 6c 28 32 29 20 5b 73 75 62 73 74 20 7b sql(2) [subst {
05a0: 20 5c 0d 0a 20 20 20 20 53 45 4c 45 43 54 20 78 \.. SELECT x
05b0: 2c 20 79 20 46 52 4f 4d 20 24 7b 74 61 62 6c 65 , y FROM ${table
05c0: 7d 20 4f 52 44 45 52 20 42 59 20 78 3b 20 5c 0d } ORDER BY x; \.
05d0: 0a 20 20 7d 5d 0d 0a 0d 0a 20 20 75 6e 73 65 74 . }].... unset
05e0: 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20 72 65 73 -nocomplain res
05f0: 75 6c 74 73 20 65 72 72 6f 72 73 0d 0a 0d 0a 20 ults errors....
0600: 20 73 65 74 20 63 6f 64 65 20 5b 63 6f 6d 70 69 set code [compi
0610: 6c 65 43 53 68 61 72 70 57 69 74 68 20 5b 73 75 leCSharpWith [su
0620: 62 73 74 20 7b 0d 0a 20 20 20 20 75 73 69 6e 67 bst {.. using
0630: 20 53 79 73 74 65 6d 2e 44 61 74 61 3b 0d 0a 20 System.Data;..
0640: 20 20 20 75 73 69 6e 67 20 53 79 73 74 65 6d 2e using System.
0650: 44 61 74 61 2e 53 51 4c 69 74 65 3b 0d 0a 0d 0a Data.SQLite;....
0660: 20 20 20 20 6e 61 6d 65 73 70 61 63 65 20 5f 44 namespace _D
0670: 79 6e 61 6d 69 63 24 7b 69 64 7d 0d 0a 20 20 20 ynamic${id}..
0680: 20 7b 0d 0a 20 20 20 20 20 20 70 75 62 6c 69 63 {.. public
0690: 20 63 6c 61 73 73 20 54 65 73 74 24 7b 69 64 7d class Test${id}
06a0: 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 .. {..
06b0: 20 20 20 70 75 62 6c 69 63 20 73 74 61 74 69 63 public static
06c0: 20 76 6f 69 64 20 4d 61 69 6e 28 29 0d 0a 20 20 void Main()..
06d0: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 {..
06e0: 20 20 20 75 73 69 6e 67 20 28 53 51 4c 69 74 65 using (SQLite
06f0: 43 6f 6e 6e 65 63 74 69 6f 6e 20 63 6f 6e 6e 65 Connection conne
0700: 63 74 69 6f 6e 20 3d 20 6e 65 77 20 53 51 4c 69 ction = new SQLi
0710: 74 65 43 6f 6e 6e 65 63 74 69 6f 6e 28 0d 0a 20 teConnection(..
0720: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 44 61 "Da
0730: 74 61 20 53 6f 75 72 63 65 3d 24 7b 64 61 74 61 ta Source=${data
0740: 53 6f 75 72 63 65 7d 3b 22 29 29 0d 0a 20 20 20 Source};"))..
0750: 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 {..
0760: 20 20 20 20 20 20 63 6f 6e 6e 65 63 74 69 6f 6e connection
0770: 2e 4f 70 65 6e 28 29 3b 0d 0a 0d 0a 20 20 20 20 .Open();....
0780: 20 20 20 20 20 20 20 20 75 73 69 6e 67 20 28 53 using (S
0790: 51 4c 69 74 65 43 6f 6d 6d 61 6e 64 20 63 6f 6d QLiteCommand com
07a0: 6d 61 6e 64 20 3d 20 63 6f 6e 6e 65 63 74 69 6f mand = connectio
07b0: 6e 2e 43 72 65 61 74 65 43 6f 6d 6d 61 6e 64 28 n.CreateCommand(
07c0: 29 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 ))..
07d0: 7b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 {..
07e0: 20 63 6f 6d 6d 61 6e 64 2e 43 6f 6d 6d 61 6e 64 command.Command
07f0: 54 65 78 74 20 3d 20 22 24 7b 73 71 6c 28 31 29 Text = "${sql(1)
0800: 7d 22 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 }";..
0810: 20 20 20 63 6f 6d 6d 61 6e 64 2e 45 78 65 63 75 command.Execu
0820: 74 65 4e 6f 6e 51 75 65 72 79 28 29 3b 0d 0a 20 teNonQuery();..
0830: 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 0d 0a }....
0840: 20 20 20 20 20 20 20 20 20 20 20 20 75 73 69 6e usin
0850: 67 20 28 53 51 4c 69 74 65 44 61 74 61 41 64 61 g (SQLiteDataAda
0860: 70 74 65 72 20 64 61 74 61 41 64 61 70 74 65 72 pter dataAdapter
0870: 20 3d 20 6e 65 77 20 53 51 4c 69 74 65 44 61 74 = new SQLiteDat
0880: 61 41 64 61 70 74 65 72 28 0d 0a 20 20 20 20 20 aAdapter(..
0890: 20 20 20 20 20 20 20 20 20 20 20 22 24 7b 73 71 "${sq
08a0: 6c 28 32 29 7d 22 2c 20 63 6f 6e 6e 65 63 74 69 l(2)}", connecti
08b0: 6f 6e 29 29 0d 0a 20 20 20 20 20 20 20 20 20 20 on))..
08c0: 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 {..
08d0: 20 20 20 75 73 69 6e 67 20 28 44 61 74 61 53 65 using (DataSe
08e0: 74 20 64 61 74 61 53 65 74 20 3d 20 6e 65 77 20 t dataSet = new
08f0: 44 61 74 61 53 65 74 28 29 29 0d 0a 20 20 20 20 DataSet())..
0900: 20 20 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 {..
0910: 20 20 20 20 20 20 20 20 20 20 20 20 20 64 61 74 dat
0920: 61 41 64 61 70 74 65 72 2e 46 69 6c 6c 28 64 61 aAdapter.Fill(da
0930: 74 61 53 65 74 2c 20 22 24 7b 74 61 62 6c 65 7d taSet, "${table}
0940: 22 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 ");....
0950: 20 20 20 20 20 20 20 44 61 74 61 54 61 62 6c 65 DataTable
0960: 20 64 61 74 61 54 61 62 6c 65 20 3d 20 64 61 74 dataTable = dat
0970: 61 53 65 74 2e 54 61 62 6c 65 73 5c 5b 22 24 7b aSet.Tables\["${
0980: 74 61 62 6c 65 7d 22 5c 5d 3b 0d 0a 0d 0a 20 20 table}"\];....
0990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 61 da
09a0: 74 61 54 61 62 6c 65 2e 43 6f 6c 75 6d 6e 73 5c taTable.Columns\
09b0: 5b 22 78 22 5c 5d 2e 55 6e 69 71 75 65 20 3d 20 ["x"\].Unique =
09c0: 74 72 75 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 true;..
09d0: 20 20 20 20 20 20 20 64 61 74 61 54 61 62 6c 65 dataTable
09e0: 2e 50 72 69 6d 61 72 79 4b 65 79 20 3d 20 6e 65 .PrimaryKey = ne
09f0: 77 20 44 61 74 61 43 6f 6c 75 6d 6e 5c 5b 5c 5d w DataColumn\[\]
0a00: 20 7b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 {..
0a10: 20 20 20 20 20 20 64 61 74 61 54 61 62 6c 65 2e dataTable.
0a20: 43 6f 6c 75 6d 6e 73 5c 5b 22 78 22 5c 5d 0d 0a Columns\["x"\]..
0a30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0a40: 7d 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 20 };....
0a50: 20 20 20 20 20 20 53 51 4c 69 74 65 43 6f 6d 6d SQLiteComm
0a60: 61 6e 64 42 75 69 6c 64 65 72 20 63 6f 6d 6d 61 andBuilder comma
0a70: 6e 64 42 75 69 6c 64 65 72 20 3d 0d 0a 20 20 20 ndBuilder =..
0a80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0a90: 20 6e 65 77 20 53 51 4c 69 74 65 43 6f 6d 6d 61 new SQLiteComma
0aa0: 6e 64 42 75 69 6c 64 65 72 28 64 61 74 61 41 64 ndBuilder(dataAd
0ab0: 61 70 74 65 72 29 3b 0d 0a 0d 0a 20 20 20 20 20 apter);....
0ac0: 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 65 61 forea
0ad0: 63 68 20 28 44 61 74 61 52 6f 77 20 64 61 74 61 ch (DataRow data
0ae0: 52 6f 77 20 69 6e 20 64 61 74 61 54 61 62 6c 65 Row in dataTable
0af0: 2e 52 6f 77 73 29 0d 0a 20 20 20 20 20 20 20 20 .Rows)..
0b00: 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 {..
0b10: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 0d //.
0b20: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0b30: 20 20 20 2f 2f 20 4e 4f 54 45 3a 20 55 70 64 61 // NOTE: Upda
0b40: 74 65 20 65 76 65 6e 20 72 6f 77 73 20 61 6e 64 te even rows and
0b50: 20 64 65 6c 65 74 65 20 6f 64 64 20 72 6f 77 73 delete odd rows
0b60: 2e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ...
0b70: 20 20 20 20 20 2f 2f 0d 0a 20 20 20 20 20 20 20 //..
0b80: 20 20 20 20 20 20 20 20 20 20 20 69 66 20 28 28 if ((
0b90: 6c 6f 6e 67 29 64 61 74 61 52 6f 77 5c 5b 22 78 long)dataRow\["x
0ba0: 22 5c 5d 20 25 20 32 20 3d 3d 20 30 29 0d 0a 20 "\] % 2 == 0)..
0bb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0bc0: 20 20 20 64 61 74 61 52 6f 77 5c 5b 22 79 22 5c dataRow\["y"\
0bd0: 5d 20 3d 20 22 7a 65 72 6f 22 3b 0d 0a 20 20 20 ] = "zero";..
0be0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 e
0bf0: 6c 73 65 0d 0a 20 20 20 20 20 20 20 20 20 20 20 lse..
0c00: 20 20 20 20 20 20 20 20 20 64 61 74 61 52 6f 77 dataRow
0c10: 2e 44 65 6c 65 74 65 28 29 3b 0d 0a 0d 0a 20 20 .Delete();....
0c20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0c30: 62 72 65 61 6b 3b 0d 0a 20 20 20 20 20 20 20 20 break;..
0c40: 20 20 20 20 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 }....
0c50: 20 20 20 20 20 20 20 20 20 20 20 20 20 64 61 74 dat
0c60: 61 41 64 61 70 74 65 72 2e 55 70 64 61 74 65 28 aAdapter.Update(
0c70: 64 61 74 61 54 61 62 6c 65 29 3b 20 2f 2f 20 44 dataTable); // D
0c80: 42 43 6f 6e 63 75 72 72 65 6e 63 79 45 78 63 65 BConcurrencyExce
0c90: 70 74 69 6f 6e 20 28 3f 29 0d 0a 20 20 20 20 20 ption (?)..
0ca0: 20 20 20 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 }..
0cb0: 20 20 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 20 }..
0cc0: 20 20 20 20 20 7d 0d 0a 20 20 20 20 20 20 20 20 }..
0cd0: 7d 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 }.. }..
0ce0: 7d 0d 0a 20 20 7d 5d 20 72 65 73 75 6c 74 73 20 }.. }] results
0cf0: 65 72 72 6f 72 73 20 53 79 73 74 65 6d 2e 44 61 errors System.Da
0d00: 74 61 2e 53 51 4c 69 74 65 2e 64 6c 6c 5d 0d 0a ta.SQLite.dll]..
0d10: 0d 0a 20 20 6c 69 73 74 20 24 63 6f 64 65 20 24 .. list $code $
0d20: 72 65 73 75 6c 74 73 20 5c 0d 0a 20 20 20 20 20 results \..
0d30: 20 5b 65 78 70 72 20 7b 5b 69 6e 66 6f 20 65 78 [expr {[info ex
0d40: 69 73 74 73 20 65 72 72 6f 72 73 5d 20 3f 20 24 ists errors] ? $
0d50: 65 72 72 6f 72 73 20 3a 20 22 22 7d 5d 20 5c 0d errors : ""}] \.
0d60: 0a 20 20 20 20 20 20 5b 65 78 70 72 20 7b 24 63 . [expr {$c
0d70: 6f 64 65 20 65 71 20 22 4f 6b 22 20 3f 20 5b 63 ode eq "Ok" ? [c
0d80: 61 74 63 68 20 7b 0d 0a 20 20 20 20 20 20 20 20 atch {..
0d90: 6f 62 6a 65 63 74 20 69 6e 76 6f 6b 65 20 5f 44 object invoke _D
0da0: 79 6e 61 6d 69 63 24 7b 69 64 7d 2e 54 65 73 74 ynamic${id}.Test
0db0: 24 7b 69 64 7d 20 4d 61 69 6e 0d 0a 20 20 20 20 ${id} Main..
0dc0: 20 20 7d 20 72 65 73 75 6c 74 5d 20 3a 20 5b 73 } result] : [s
0dd0: 65 74 20 72 65 73 75 6c 74 20 22 22 5d 7d 5d 20 et result ""]}]
0de0: 24 72 65 73 75 6c 74 0d 0a 7d 20 2d 63 6c 65 61 $result..} -clea
0df0: 6e 75 70 20 7b 0d 0a 20 20 63 6c 65 61 6e 75 70 nup {.. cleanup
0e00: 44 62 20 24 6f 74 68 65 72 46 69 6c 65 4e 61 6d Db $otherFileNam
0e10: 65 0d 0a 20 20 63 6c 65 61 6e 75 70 44 62 20 24 e.. cleanupDb $
0e20: 66 69 6c 65 4e 61 6d 65 0d 0a 0d 0a 20 20 75 6e fileName.... un
0e30: 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20 set -nocomplain
0e40: 72 65 73 75 6c 74 20 63 6f 64 65 20 72 65 73 75 result code resu
0e50: 6c 74 73 20 65 72 72 6f 72 73 20 69 20 73 71 6c lts errors i sql
0e60: 20 74 61 62 6c 65 20 6f 74 68 65 72 44 62 4e 61 table otherDbNa
0e70: 6d 65 20 5c 0d 0a 20 20 20 20 20 20 6f 74 68 65 me \.. othe
0e80: 72 44 61 74 61 53 6f 75 72 63 65 20 64 61 74 61 rDataSource data
0e90: 53 6f 75 72 63 65 20 69 64 20 64 62 20 6f 74 68 Source id db oth
0ea0: 65 72 46 69 6c 65 4e 61 6d 65 20 66 69 6c 65 4e erFileName fileN
0eb0: 61 6d 65 0d 0a 7d 20 2d 63 6f 6e 73 74 72 61 69 ame..} -constrai
0ec0: 6e 74 73 20 5c 0d 0a 7b 65 61 67 6c 65 20 6d 6f nts \..{eagle mo
0ed0: 6e 6f 42 75 67 32 38 20 63 6f 6d 6d 61 6e 64 2e noBug28 command.
0ee0: 73 71 6c 20 63 6f 6d 70 69 6c 65 2e 44 41 54 41 sql compile.DATA
0ef0: 20 53 51 4c 69 74 65 20 53 79 73 74 65 6d 2e 44 SQLite System.D
0f00: 61 74 61 2e 53 51 4c 69 74 65 7d 20 2d 6d 61 74 ata.SQLite} -mat
0f10: 63 68 20 5c 0d 0a 72 65 67 65 78 70 20 2d 72 65 ch \..regexp -re
0f20: 73 75 6c 74 20 7b 5e 4f 6b 20 53 79 73 74 65 6d sult {^Ok System
0f30: 23 43 6f 64 65 44 6f 6d 23 43 6f 6d 70 69 6c 65 #CodeDom#Compile
0f40: 72 23 43 6f 6d 70 69 6c 65 72 52 65 73 75 6c 74 r#CompilerResult
0f50: 73 23 5c 64 2b 20 5c 7b 5c 7d 20 30 20 5c 7b 5c s#\d+ \{\} 0 \{\
0f60: 7d 24 7d 7d 0d 0a 0d 0a 23 23 23 23 23 23 23 23 }$}}....########
0f70: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0f80: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0f90: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0fa0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
0fb0: 23 23 23 23 23 23 23 0d 0a 0d 0a 72 75 6e 53 51 #######....runSQ
0fc0: 4c 69 74 65 54 65 73 74 45 70 69 6c 6f 67 75 65 LiteTestEpilogue
0fd0: 0d 0a 72 75 6e 54 65 73 74 45 70 69 6c 6f 67 75 ..runTestEpilogu
0fe0: 65 0d 0a e..