System.Data.SQLite
Hex Artifact Content
Not logged in

Artifact a7e1996eb68d8db7933ac71aadc05ab040458b4f:


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 70 72 6f 67 72 65 73 73 2e 65  .#..# progress.e
0060: 61 67 6c 65 20 2d 2d 0d 0a 23 0d 0a 23 20 57 72  agle --..#..# Wr
0070: 69 74 74 65 6e 20 62 79 20 4a 6f 65 20 4d 69 73  itten by Joe Mis
0080: 74 61 63 68 6b 69 6e 2e 0d 0a 23 20 52 65 6c 65  tachkin...# Rele
0090: 61 73 65 64 20 74 6f 20 74 68 65 20 70 75 62 6c  ased to the publ
00a0: 69 63 20 64 6f 6d 61 69 6e 2c 20 75 73 65 20 61  ic domain, use a
00b0: 74 20 79 6f 75 72 20 6f 77 6e 20 72 69 73 6b 21  t your own risk!
00c0: 0d 0a 23 0d 0a 23 23 23 23 23 23 23 23 23 23 23  ..#..###########
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 0d 0a 0d 0a 70 61 63 6b 61 67 65 20  ####....package 
0120: 72 65 71 75 69 72 65 20 45 61 67 6c 65 0d 0a 70  require Eagle..p
0130: 61 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 45  ackage require E
0140: 61 67 6c 65 2e 4c 69 62 72 61 72 79 0d 0a 70 61  agle.Library..pa
0150: 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 45 61  ckage require Ea
0160: 67 6c 65 2e 54 65 73 74 0d 0a 0d 0a 72 75 6e 54  gle.Test....runT
0170: 65 73 74 50 72 6f 6c 6f 67 75 65 0d 0a 0d 0a 23  estPrologue....#
0180: 23 23 23 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 0d 0a  ##############..
01d0: 0d 0a 70 61 63 6b 61 67 65 20 72 65 71 75 69 72  ..package requir
01e0: 65 20 53 79 73 74 65 6d 2e 44 61 74 61 2e 53 51  e System.Data.SQ
01f0: 4c 69 74 65 2e 54 65 73 74 0d 0a 72 75 6e 53 51  Lite.Test..runSQ
0200: 4c 69 74 65 54 65 73 74 50 72 6f 6c 6f 67 75 65  LiteTestPrologue
0210: 0d 0a 0d 0a 23 23 23 23 23 23 23 23 23 23 23 23  ....############
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 0d 0a 0d 0a 72 75 6e 54 65 73 74 20 7b  ###....runTest {
0270: 74 65 73 74 20 70 72 6f 67 72 65 73 73 2d 31 2e  test progress-1.
0280: 31 20 7b 6e 6f 20 70 72 6f 67 72 65 73 73 20 77  1 {no progress w
0290: 69 74 68 6f 75 74 20 50 72 6f 67 72 65 73 73 4f  ithout ProgressO
02a0: 70 73 7d 20 2d 73 65 74 75 70 20 7b 0d 0a 20 20  ps} -setup {..  
02b0: 73 65 74 75 70 44 62 20 5b 73 65 74 20 66 69 6c  setupDb [set fil
02c0: 65 4e 61 6d 65 20 70 72 6f 67 72 65 73 73 2d 31  eName progress-1
02d0: 2e 31 2e 64 62 5d 0d 0a 7d 20 2d 62 6f 64 79 20  .1.db]..} -body 
02e0: 7b 0d 0a 20 20 73 65 74 20 69 64 20 5b 6f 62 6a  {..  set id [obj
02f0: 65 63 74 20 69 6e 76 6f 6b 65 20 49 6e 74 65 72  ect invoke Inter
0300: 70 72 65 74 65 72 2e 47 65 74 41 63 74 69 76 65  preter.GetActive
0310: 20 4e 65 78 74 49 64 5d 0d 0a 20 20 73 65 74 20   NextId]..  set 
0320: 64 61 74 61 53 6f 75 72 63 65 20 5b 66 69 6c 65  dataSource [file
0330: 20 6a 6f 69 6e 20 5b 67 65 74 44 61 74 61 62 61   join [getDataba
0340: 73 65 44 69 72 65 63 74 6f 72 79 5d 20 24 66 69  seDirectory] $fi
0350: 6c 65 4e 61 6d 65 5d 0d 0a 0d 0a 20 20 73 65 74  leName]....  set
0360: 20 73 71 6c 20 7b 20 5c 0d 0a 20 20 20 20 43 52   sql { \..    CR
0370: 45 41 54 45 20 54 41 42 4c 45 20 74 31 28 78 20  EATE TABLE t1(x 
0380: 49 4e 54 45 47 45 52 29 3b 20 5c 0d 0a 20 20 20  INTEGER); \..   
0390: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20   INSERT INTO t1 
03a0: 28 78 29 20 56 41 4c 55 45 53 28 31 29 3b 20 5c  (x) VALUES(1); \
03b0: 0d 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54  ..    INSERT INT
03c0: 4f 20 74 31 20 28 78 29 20 56 41 4c 55 45 53 28  O t1 (x) VALUES(
03d0: 32 29 3b 20 5c 0d 0a 20 20 20 20 49 4e 53 45 52  2); \..    INSER
03e0: 54 20 49 4e 54 4f 20 74 31 20 28 78 29 20 56 41  T INTO t1 (x) VA
03f0: 4c 55 45 53 28 33 29 3b 20 5c 0d 0a 20 20 20 20  LUES(3); \..    
0400: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 28  INSERT INTO t1 (
0410: 78 29 20 56 41 4c 55 45 53 28 34 29 3b 20 5c 0d  x) VALUES(4); \.
0420: 0a 20 20 20 20 53 45 4c 45 43 54 20 78 20 46 52  .    SELECT x FR
0430: 4f 4d 20 74 31 20 4f 52 44 45 52 20 42 59 20 78  OM t1 ORDER BY x
0440: 3b 20 5c 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 75 6e  ; \..  }....  un
0450: 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20  set -nocomplain 
0460: 72 65 73 75 6c 74 73 20 65 72 72 6f 72 73 0d 0a  results errors..
0470: 0d 0a 20 20 73 65 74 20 63 6f 64 65 20 5b 63 6f  ..  set code [co
0480: 6d 70 69 6c 65 43 53 68 61 72 70 57 69 74 68 20  mpileCSharpWith 
0490: 5b 73 75 62 73 74 20 7b 0d 0a 20 20 20 20 75 73  [subst {..    us
04a0: 69 6e 67 20 53 79 73 74 65 6d 2e 44 61 74 61 2e  ing System.Data.
04b0: 53 51 4c 69 74 65 3b 0d 0a 0d 0a 20 20 20 20 6e  SQLite;....    n
04c0: 61 6d 65 73 70 61 63 65 20 5f 44 79 6e 61 6d 69  amespace _Dynami
04d0: 63 24 7b 69 64 7d 0d 0a 20 20 20 20 7b 0d 0a 20  c${id}..    {.. 
04e0: 20 20 20 20 20 70 75 62 6c 69 63 20 73 74 61 74       public stat
04f0: 69 63 20 63 6c 61 73 73 20 54 65 73 74 24 7b 69  ic class Test${i
0500: 64 7d 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20  d}..      {..   
0510: 20 20 20 20 20 70 72 69 76 61 74 65 20 73 74 61       private sta
0520: 74 69 63 20 69 6e 74 20 63 6f 75 6e 74 20 3d 20  tic int count = 
0530: 30 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 2f 2f  0;....        //
0540: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0550: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0560: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0570: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0580: 2f 2f 2f 2f 2f 0d 0a 0d 0a 20 20 20 20 20 20 20  /////....       
0590: 20 70 75 62 6c 69 63 20 73 74 61 74 69 63 20 76   public static v
05a0: 6f 69 64 20 4d 79 50 72 6f 67 72 65 73 73 48 61  oid MyProgressHa
05b0: 6e 64 6c 65 72 28 0d 0a 20 20 20 20 20 20 20 20  ndler(..        
05c0: 20 20 6f 62 6a 65 63 74 20 73 65 6e 64 65 72 2c    object sender,
05d0: 0d 0a 20 20 20 20 20 20 20 20 20 20 50 72 6f 67  ..          Prog
05e0: 72 65 73 73 45 76 65 6e 74 41 72 67 73 20 65 0d  ressEventArgs e.
05f0: 0a 20 20 20 20 20 20 20 20 20 20 29 0d 0a 20 20  .          )..  
0600: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20        {..       
0610: 20 20 20 63 6f 75 6e 74 2b 2b 3b 0d 0a 20 20 20     count++;..   
0620: 20 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 20 20       }....      
0630: 20 20 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f    //////////////
0640: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0650: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0660: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0670: 2f 2f 2f 2f 2f 2f 2f 2f 2f 0d 0a 0d 0a 20 20 20  /////////....   
0680: 20 20 20 20 20 70 75 62 6c 69 63 20 73 74 61 74       public stat
0690: 69 63 20 69 6e 74 20 4d 61 69 6e 28 29 0d 0a 20  ic int Main().. 
06a0: 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20         {..      
06b0: 20 20 20 20 75 73 69 6e 67 20 28 53 51 4c 69 74      using (SQLit
06c0: 65 43 6f 6e 6e 65 63 74 69 6f 6e 20 63 6f 6e 6e  eConnection conn
06d0: 65 63 74 69 6f 6e 20 3d 20 6e 65 77 20 53 51 4c  ection = new SQL
06e0: 69 74 65 43 6f 6e 6e 65 63 74 69 6f 6e 28 0d 0a  iteConnection(..
06f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 44                "D
0700: 61 74 61 20 53 6f 75 72 63 65 3d 24 7b 64 61 74  ata Source=${dat
0710: 61 53 6f 75 72 63 65 7d 3b 5b 67 65 74 54 65 73  aSource};[getTes
0720: 74 50 72 6f 70 65 72 74 69 65 73 5d 22 29 29 0d  tProperties]")).
0730: 0a 20 20 20 20 20 20 20 20 20 20 7b 0d 0a 20 20  .          {..  
0740: 20 20 20 20 20 20 20 20 20 20 63 6f 6e 6e 65 63            connec
0750: 74 69 6f 6e 2e 50 72 6f 67 72 65 73 73 20 2b 3d  tion.Progress +=
0760: 20 4d 79 50 72 6f 67 72 65 73 73 48 61 6e 64 6c   MyProgressHandl
0770: 65 72 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20  er;..           
0780: 20 63 6f 6e 6e 65 63 74 69 6f 6e 2e 4f 70 65 6e   connection.Open
0790: 28 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20  ();....         
07a0: 20 20 20 75 73 69 6e 67 20 28 53 51 4c 69 74 65     using (SQLite
07b0: 43 6f 6d 6d 61 6e 64 20 63 6f 6d 6d 61 6e 64 20  Command command 
07c0: 3d 20 6e 65 77 20 53 51 4c 69 74 65 43 6f 6d 6d  = new SQLiteComm
07d0: 61 6e 64 28 22 24 7b 73 71 6c 7d 22 2c 0d 0a 20  and("${sql}",.. 
07e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63                 c
07f0: 6f 6e 6e 65 63 74 69 6f 6e 29 29 0d 0a 20 20 20  onnection))..   
0800: 20 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20           {..    
0810: 20 20 20 20 20 20 20 20 20 20 63 6f 6d 6d 61 6e            comman
0820: 64 2e 45 78 65 63 75 74 65 4e 6f 6e 51 75 65 72  d.ExecuteNonQuer
0830: 79 28 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20  y();..          
0840: 20 20 7d 0d 0a 20 20 20 20 20 20 20 20 20 20 7d    }..          }
0850: 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 20 72 65  ....          re
0860: 74 75 72 6e 20 63 6f 75 6e 74 3b 0d 0a 20 20 20  turn count;..   
0870: 20 20 20 20 20 7d 0d 0a 20 20 20 20 20 20 7d 0d       }..      }.
0880: 0a 20 20 20 20 7d 0d 0a 20 20 7d 5d 20 74 72 75  .    }..  }] tru
0890: 65 20 74 72 75 65 20 74 72 75 65 20 72 65 73 75  e true true resu
08a0: 6c 74 73 20 65 72 72 6f 72 73 20 53 79 73 74 65  lts errors Syste
08b0: 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e 64 6c  m.Data.SQLite.dl
08c0: 6c 5d 0d 0a 0d 0a 20 20 6c 69 73 74 20 24 63 6f  l]....  list $co
08d0: 64 65 20 24 72 65 73 75 6c 74 73 20 5c 0d 0a 20  de $results \.. 
08e0: 20 20 20 20 20 5b 65 78 70 72 20 7b 5b 69 6e 66       [expr {[inf
08f0: 6f 20 65 78 69 73 74 73 20 65 72 72 6f 72 73 5d  o exists errors]
0900: 20 3f 20 24 65 72 72 6f 72 73 20 3a 20 22 22 7d   ? $errors : ""}
0910: 5d 20 5c 0d 0a 20 20 20 20 20 20 5b 65 78 70 72  ] \..      [expr
0920: 20 7b 24 63 6f 64 65 20 65 71 20 22 4f 6b 22 20   {$code eq "Ok" 
0930: 3f 20 5b 63 61 74 63 68 20 7b 0d 0a 20 20 20 20  ? [catch {..    
0940: 20 20 20 20 6f 62 6a 65 63 74 20 69 6e 76 6f 6b      object invok
0950: 65 20 5f 44 79 6e 61 6d 69 63 24 7b 69 64 7d 2e  e _Dynamic${id}.
0960: 54 65 73 74 24 7b 69 64 7d 20 4d 61 69 6e 0d 0a  Test${id} Main..
0970: 20 20 20 20 20 20 7d 20 72 65 73 75 6c 74 5d 20        } result] 
0980: 3a 20 5b 73 65 74 20 72 65 73 75 6c 74 20 22 22  : [set result ""
0990: 5d 7d 5d 20 24 72 65 73 75 6c 74 20 5c 0d 0a 20  ]}] $result \.. 
09a0: 20 20 20 20 20 5b 65 78 70 72 20 7b 5b 73 74 72       [expr {[str
09b0: 69 6e 67 20 69 73 20 69 6e 74 65 67 65 72 20 2d  ing is integer -
09c0: 73 74 72 69 63 74 20 24 72 65 73 75 6c 74 5d 20  strict $result] 
09d0: 26 26 20 24 72 65 73 75 6c 74 20 3d 3d 20 30 20  && $result == 0 
09e0: 3f 20 31 20 3a 20 30 7d 5d 0d 0a 7d 20 2d 63 6c  ? 1 : 0}]..} -cl
09f0: 65 61 6e 75 70 20 7b 0d 0a 20 20 63 6c 65 61 6e  eanup {..  clean
0a00: 75 70 44 62 20 24 66 69 6c 65 4e 61 6d 65 0d 0a  upDb $fileName..
0a10: 0d 0a 20 20 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d  ..  unset -nocom
0a20: 70 6c 61 69 6e 20 72 65 73 75 6c 74 20 72 65 73  plain result res
0a30: 75 6c 74 73 20 65 72 72 6f 72 73 20 63 6f 64 65  ults errors code
0a40: 20 73 71 6c 20 64 61 74 61 53 6f 75 72 63 65 20   sql dataSource 
0a50: 69 64 20 64 62 20 66 69 6c 65 4e 61 6d 65 0d 0a  id db fileName..
0a60: 7d 20 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b  } -constraints {
0a70: 65 61 67 6c 65 20 63 6f 6d 6d 61 6e 64 2e 6f 62  eagle command.ob
0a80: 6a 65 63 74 20 6d 6f 6e 6f 42 75 67 32 38 20 63  ject monoBug28 c
0a90: 6f 6d 6d 61 6e 64 2e 73 71 6c 20 63 6f 6d 70 69  ommand.sql compi
0aa0: 6c 65 2e 44 41 54 41 20 53 51 4c 69 74 65 5c 0d  le.DATA SQLite\.
0ab0: 0a 53 79 73 74 65 6d 2e 44 61 74 61 2e 53 51 4c  .System.Data.SQL
0ac0: 69 74 65 20 63 6f 6d 70 69 6c 65 43 53 68 61 72  ite compileCShar
0ad0: 70 7d 20 2d 6d 61 74 63 68 20 72 65 67 65 78 70  p} -match regexp
0ae0: 20 2d 72 65 73 75 6c 74 20 7b 5e 4f 6b 5c 0d 0a   -result {^Ok\..
0af0: 53 79 73 74 65 6d 23 43 6f 64 65 44 6f 6d 23 43  System#CodeDom#C
0b00: 6f 6d 70 69 6c 65 72 23 43 6f 6d 70 69 6c 65 72  ompiler#Compiler
0b10: 52 65 73 75 6c 74 73 23 5c 64 2b 20 5c 7b 5c 7d  Results#\d+ \{\}
0b20: 20 30 20 30 20 31 24 7d 7d 0d 0a 0d 0a 23 23 23   0 0 1$}}....###
0b30: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0b40: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0b50: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0b60: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0b70: 23 23 23 23 23 23 23 23 23 23 23 23 0d 0a 0d 0a  ############....
0b80: 72 75 6e 54 65 73 74 20 7b 74 65 73 74 20 70 72  runTest {test pr
0b90: 6f 67 72 65 73 73 2d 31 2e 32 20 7b 73 69 6d 70  ogress-1.2 {simp
0ba0: 6c 65 20 70 72 6f 67 72 65 73 73 20 63 6f 75 6e  le progress coun
0bb0: 74 65 72 7d 20 2d 73 65 74 75 70 20 7b 0d 0a 20  ter} -setup {.. 
0bc0: 20 73 65 74 75 70 44 62 20 5b 73 65 74 20 66 69   setupDb [set fi
0bd0: 6c 65 4e 61 6d 65 20 70 72 6f 67 72 65 73 73 2d  leName progress-
0be0: 31 2e 32 2e 64 62 5d 0d 0a 7d 20 2d 62 6f 64 79  1.2.db]..} -body
0bf0: 20 7b 0d 0a 20 20 73 65 74 20 69 64 20 5b 6f 62   {..  set id [ob
0c00: 6a 65 63 74 20 69 6e 76 6f 6b 65 20 49 6e 74 65  ject invoke Inte
0c10: 72 70 72 65 74 65 72 2e 47 65 74 41 63 74 69 76  rpreter.GetActiv
0c20: 65 20 4e 65 78 74 49 64 5d 0d 0a 20 20 73 65 74  e NextId]..  set
0c30: 20 64 61 74 61 53 6f 75 72 63 65 20 5b 66 69 6c   dataSource [fil
0c40: 65 20 6a 6f 69 6e 20 5b 67 65 74 44 61 74 61 62  e join [getDatab
0c50: 61 73 65 44 69 72 65 63 74 6f 72 79 5d 20 24 66  aseDirectory] $f
0c60: 69 6c 65 4e 61 6d 65 5d 0d 0a 0d 0a 20 20 73 65  ileName]....  se
0c70: 74 20 73 71 6c 20 7b 20 5c 0d 0a 20 20 20 20 43  t sql { \..    C
0c80: 52 45 41 54 45 20 54 41 42 4c 45 20 74 31 28 78  REATE TABLE t1(x
0c90: 20 49 4e 54 45 47 45 52 29 3b 20 5c 0d 0a 20 20   INTEGER); \..  
0ca0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31    INSERT INTO t1
0cb0: 20 28 78 29 20 56 41 4c 55 45 53 28 31 29 3b 20   (x) VALUES(1); 
0cc0: 5c 0d 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e  \..    INSERT IN
0cd0: 54 4f 20 74 31 20 28 78 29 20 56 41 4c 55 45 53  TO t1 (x) VALUES
0ce0: 28 32 29 3b 20 5c 0d 0a 20 20 20 20 49 4e 53 45  (2); \..    INSE
0cf0: 52 54 20 49 4e 54 4f 20 74 31 20 28 78 29 20 56  RT INTO t1 (x) V
0d00: 41 4c 55 45 53 28 33 29 3b 20 5c 0d 0a 20 20 20  ALUES(3); \..   
0d10: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20   INSERT INTO t1 
0d20: 28 78 29 20 56 41 4c 55 45 53 28 34 29 3b 20 5c  (x) VALUES(4); \
0d30: 0d 0a 20 20 20 20 53 45 4c 45 43 54 20 78 20 46  ..    SELECT x F
0d40: 52 4f 4d 20 74 31 20 4f 52 44 45 52 20 42 59 20  ROM t1 ORDER BY 
0d50: 78 3b 20 5c 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 75  x; \..  }....  u
0d60: 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e  nset -nocomplain
0d70: 20 72 65 73 75 6c 74 73 20 65 72 72 6f 72 73 0d   results errors.
0d80: 0a 0d 0a 20 20 73 65 74 20 63 6f 64 65 20 5b 63  ...  set code [c
0d90: 6f 6d 70 69 6c 65 43 53 68 61 72 70 57 69 74 68  ompileCSharpWith
0da0: 20 5b 73 75 62 73 74 20 7b 0d 0a 20 20 20 20 75   [subst {..    u
0db0: 73 69 6e 67 20 53 79 73 74 65 6d 2e 44 61 74 61  sing System.Data
0dc0: 2e 53 51 4c 69 74 65 3b 0d 0a 0d 0a 20 20 20 20  .SQLite;....    
0dd0: 6e 61 6d 65 73 70 61 63 65 20 5f 44 79 6e 61 6d  namespace _Dynam
0de0: 69 63 24 7b 69 64 7d 0d 0a 20 20 20 20 7b 0d 0a  ic${id}..    {..
0df0: 20 20 20 20 20 20 70 75 62 6c 69 63 20 73 74 61        public sta
0e00: 74 69 63 20 63 6c 61 73 73 20 54 65 73 74 24 7b  tic class Test${
0e10: 69 64 7d 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20  id}..      {..  
0e20: 20 20 20 20 20 20 70 72 69 76 61 74 65 20 73 74        private st
0e30: 61 74 69 63 20 69 6e 74 20 63 6f 75 6e 74 20 3d  atic int count =
0e40: 20 30 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 2f   0;....        /
0e50: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0e60: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0e70: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0e80: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0e90: 2f 2f 2f 2f 2f 2f 0d 0a 0d 0a 20 20 20 20 20 20  //////....      
0ea0: 20 20 70 75 62 6c 69 63 20 73 74 61 74 69 63 20    public static 
0eb0: 76 6f 69 64 20 4d 79 50 72 6f 67 72 65 73 73 48  void MyProgressH
0ec0: 61 6e 64 6c 65 72 28 0d 0a 20 20 20 20 20 20 20  andler(..       
0ed0: 20 20 20 6f 62 6a 65 63 74 20 73 65 6e 64 65 72     object sender
0ee0: 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 50 72 6f  ,..          Pro
0ef0: 67 72 65 73 73 45 76 65 6e 74 41 72 67 73 20 65  gressEventArgs e
0f00: 0d 0a 20 20 20 20 20 20 20 20 20 20 29 0d 0a 20  ..          ).. 
0f10: 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20         {..      
0f20: 20 20 20 20 63 6f 75 6e 74 2b 2b 3b 0d 0a 20 20      count++;..  
0f30: 20 20 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 20        }....     
0f40: 20 20 20 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f     /////////////
0f50: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0f60: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0f70: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
0f80: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 0d 0a 0d 0a 20 20  //////////....  
0f90: 20 20 20 20 20 20 70 75 62 6c 69 63 20 73 74 61        public sta
0fa0: 74 69 63 20 69 6e 74 20 4d 61 69 6e 28 29 0d 0a  tic int Main()..
0fb0: 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20          {..     
0fc0: 20 20 20 20 20 75 73 69 6e 67 20 28 53 51 4c 69       using (SQLi
0fd0: 74 65 43 6f 6e 6e 65 63 74 69 6f 6e 20 63 6f 6e  teConnection con
0fe0: 6e 65 63 74 69 6f 6e 20 3d 20 6e 65 77 20 53 51  nection = new SQ
0ff0: 4c 69 74 65 43 6f 6e 6e 65 63 74 69 6f 6e 28 0d  LiteConnection(.
1000: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22  .              "
1010: 44 61 74 61 20 53 6f 75 72 63 65 3d 24 7b 64 61  Data Source=${da
1020: 74 61 53 6f 75 72 63 65 7d 3b 50 72 6f 67 72 65  taSource};Progre
1030: 73 73 4f 70 73 3d 31 3b 5b 67 65 74 54 65 73 74  ssOps=1;[getTest
1040: 50 72 6f 70 65 72 74 69 65 73 5d 22 29 29 0d 0a  Properties]"))..
1050: 20 20 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20            {..   
1060: 20 20 20 20 20 20 20 20 20 63 6f 6e 6e 65 63 74           connect
1070: 69 6f 6e 2e 50 72 6f 67 72 65 73 73 20 2b 3d 20  ion.Progress += 
1080: 4d 79 50 72 6f 67 72 65 73 73 48 61 6e 64 6c 65  MyProgressHandle
1090: 72 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20  r;..            
10a0: 63 6f 6e 6e 65 63 74 69 6f 6e 2e 4f 70 65 6e 28  connection.Open(
10b0: 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 20  );....          
10c0: 20 20 75 73 69 6e 67 20 28 53 51 4c 69 74 65 43    using (SQLiteC
10d0: 6f 6d 6d 61 6e 64 20 63 6f 6d 6d 61 6e 64 20 3d  ommand command =
10e0: 20 6e 65 77 20 53 51 4c 69 74 65 43 6f 6d 6d 61   new SQLiteComma
10f0: 6e 64 28 22 24 7b 73 71 6c 7d 22 2c 0d 0a 20 20  nd("${sql}",..  
1100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f                co
1110: 6e 6e 65 63 74 69 6f 6e 29 29 0d 0a 20 20 20 20  nnection))..    
1120: 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20          {..     
1130: 20 20 20 20 20 20 20 20 20 63 6f 6d 6d 61 6e 64           command
1140: 2e 45 78 65 63 75 74 65 4e 6f 6e 51 75 65 72 79  .ExecuteNonQuery
1150: 28 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20  ();..           
1160: 20 7d 0d 0a 20 20 20 20 20 20 20 20 20 20 7d 0d   }..          }.
1170: 0a 0d 0a 20 20 20 20 20 20 20 20 20 20 72 65 74  ...          ret
1180: 75 72 6e 20 63 6f 75 6e 74 3b 0d 0a 20 20 20 20  urn count;..    
1190: 20 20 20 20 7d 0d 0a 20 20 20 20 20 20 7d 0d 0a      }..      }..
11a0: 20 20 20 20 7d 0d 0a 20 20 7d 5d 20 74 72 75 65      }..  }] true
11b0: 20 74 72 75 65 20 74 72 75 65 20 72 65 73 75 6c   true true resul
11c0: 74 73 20 65 72 72 6f 72 73 20 53 79 73 74 65 6d  ts errors System
11d0: 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e 64 6c 6c  .Data.SQLite.dll
11e0: 5d 0d 0a 0d 0a 20 20 6c 69 73 74 20 24 63 6f 64  ]....  list $cod
11f0: 65 20 24 72 65 73 75 6c 74 73 20 5c 0d 0a 20 20  e $results \..  
1200: 20 20 20 20 5b 65 78 70 72 20 7b 5b 69 6e 66 6f      [expr {[info
1210: 20 65 78 69 73 74 73 20 65 72 72 6f 72 73 5d 20   exists errors] 
1220: 3f 20 24 65 72 72 6f 72 73 20 3a 20 22 22 7d 5d  ? $errors : ""}]
1230: 20 5c 0d 0a 20 20 20 20 20 20 5b 65 78 70 72 20   \..      [expr 
1240: 7b 24 63 6f 64 65 20 65 71 20 22 4f 6b 22 20 3f  {$code eq "Ok" ?
1250: 20 5b 63 61 74 63 68 20 7b 0d 0a 20 20 20 20 20   [catch {..     
1260: 20 20 20 6f 62 6a 65 63 74 20 69 6e 76 6f 6b 65     object invoke
1270: 20 5f 44 79 6e 61 6d 69 63 24 7b 69 64 7d 2e 54   _Dynamic${id}.T
1280: 65 73 74 24 7b 69 64 7d 20 4d 61 69 6e 0d 0a 20  est${id} Main.. 
1290: 20 20 20 20 20 7d 20 72 65 73 75 6c 74 5d 20 3a       } result] :
12a0: 20 5b 73 65 74 20 72 65 73 75 6c 74 20 22 22 5d   [set result ""]
12b0: 7d 5d 20 24 72 65 73 75 6c 74 20 5c 0d 0a 20 20  }] $result \..  
12c0: 20 20 20 20 5b 65 78 70 72 20 7b 5b 73 74 72 69      [expr {[stri
12d0: 6e 67 20 69 73 20 69 6e 74 65 67 65 72 20 2d 73  ng is integer -s
12e0: 74 72 69 63 74 20 24 72 65 73 75 6c 74 5d 20 26  trict $result] &
12f0: 26 20 24 72 65 73 75 6c 74 20 3e 20 30 20 3f 20  & $result > 0 ? 
1300: 31 20 3a 20 30 7d 5d 0d 0a 7d 20 2d 63 6c 65 61  1 : 0}]..} -clea
1310: 6e 75 70 20 7b 0d 0a 20 20 63 6c 65 61 6e 75 70  nup {..  cleanup
1320: 44 62 20 24 66 69 6c 65 4e 61 6d 65 0d 0a 0d 0a  Db $fileName....
1330: 20 20 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c    unset -nocompl
1340: 61 69 6e 20 72 65 73 75 6c 74 20 72 65 73 75 6c  ain result resul
1350: 74 73 20 65 72 72 6f 72 73 20 63 6f 64 65 20 73  ts errors code s
1360: 71 6c 20 64 61 74 61 53 6f 75 72 63 65 20 69 64  ql dataSource id
1370: 20 64 62 20 66 69 6c 65 4e 61 6d 65 0d 0a 7d 20   db fileName..} 
1380: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 65 61  -constraints {ea
1390: 67 6c 65 20 63 6f 6d 6d 61 6e 64 2e 6f 62 6a 65  gle command.obje
13a0: 63 74 20 6d 6f 6e 6f 42 75 67 32 38 20 63 6f 6d  ct monoBug28 com
13b0: 6d 61 6e 64 2e 73 71 6c 20 63 6f 6d 70 69 6c 65  mand.sql compile
13c0: 2e 44 41 54 41 20 53 51 4c 69 74 65 5c 0d 0a 53  .DATA SQLite\..S
13d0: 79 73 74 65 6d 2e 44 61 74 61 2e 53 51 4c 69 74  ystem.Data.SQLit
13e0: 65 20 63 6f 6d 70 69 6c 65 43 53 68 61 72 70 7d  e compileCSharp}
13f0: 20 2d 6d 61 74 63 68 20 72 65 67 65 78 70 20 2d   -match regexp -
1400: 72 65 73 75 6c 74 20 7b 5e 4f 6b 5c 0d 0a 53 79  result {^Ok\..Sy
1410: 73 74 65 6d 23 43 6f 64 65 44 6f 6d 23 43 6f 6d  stem#CodeDom#Com
1420: 70 69 6c 65 72 23 43 6f 6d 70 69 6c 65 72 52 65  piler#CompilerRe
1430: 73 75 6c 74 73 23 5c 64 2b 20 5c 7b 5c 7d 20 30  sults#\d+ \{\} 0
1440: 20 5c 64 2b 20 31 24 7d 7d 0d 0a 0d 0a 23 23 23   \d+ 1$}}....###
1450: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1460: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1470: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1480: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1490: 23 23 23 23 23 23 23 23 23 23 23 23 0d 0a 0d 0a  ############....
14a0: 72 75 6e 54 65 73 74 20 7b 74 65 73 74 20 70 72  runTest {test pr
14b0: 6f 67 72 65 73 73 2d 31 2e 33 20 7b 70 72 6f 67  ogress-1.3 {prog
14c0: 72 65 73 73 20 77 69 74 68 20 69 6e 74 65 72 72  ress with interr
14d0: 75 70 74 7d 20 2d 73 65 74 75 70 20 7b 0d 0a 20  upt} -setup {.. 
14e0: 20 73 65 74 75 70 44 62 20 5b 73 65 74 20 66 69   setupDb [set fi
14f0: 6c 65 4e 61 6d 65 20 70 72 6f 67 72 65 73 73 2d  leName progress-
1500: 31 2e 33 2e 64 62 5d 0d 0a 7d 20 2d 62 6f 64 79  1.3.db]..} -body
1510: 20 7b 0d 0a 20 20 73 65 74 20 69 64 20 5b 6f 62   {..  set id [ob
1520: 6a 65 63 74 20 69 6e 76 6f 6b 65 20 49 6e 74 65  ject invoke Inte
1530: 72 70 72 65 74 65 72 2e 47 65 74 41 63 74 69 76  rpreter.GetActiv
1540: 65 20 4e 65 78 74 49 64 5d 0d 0a 20 20 73 65 74  e NextId]..  set
1550: 20 64 61 74 61 53 6f 75 72 63 65 20 5b 66 69 6c   dataSource [fil
1560: 65 20 6a 6f 69 6e 20 5b 67 65 74 44 61 74 61 62  e join [getDatab
1570: 61 73 65 44 69 72 65 63 74 6f 72 79 5d 20 24 66  aseDirectory] $f
1580: 69 6c 65 4e 61 6d 65 5d 0d 0a 0d 0a 20 20 73 65  ileName]....  se
1590: 74 20 73 71 6c 20 7b 20 5c 0d 0a 20 20 20 20 43  t sql { \..    C
15a0: 52 45 41 54 45 20 54 41 42 4c 45 20 74 31 28 78  REATE TABLE t1(x
15b0: 20 49 4e 54 45 47 45 52 29 3b 20 5c 0d 0a 20 20   INTEGER); \..  
15c0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31    INSERT INTO t1
15d0: 20 28 78 29 20 56 41 4c 55 45 53 28 31 29 3b 20   (x) VALUES(1); 
15e0: 5c 0d 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e  \..    INSERT IN
15f0: 54 4f 20 74 31 20 28 78 29 20 56 41 4c 55 45 53  TO t1 (x) VALUES
1600: 28 32 29 3b 20 5c 0d 0a 20 20 20 20 49 4e 53 45  (2); \..    INSE
1610: 52 54 20 49 4e 54 4f 20 74 31 20 28 78 29 20 56  RT INTO t1 (x) V
1620: 41 4c 55 45 53 28 33 29 3b 20 5c 0d 0a 20 20 20  ALUES(3); \..   
1630: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20   INSERT INTO t1 
1640: 28 78 29 20 56 41 4c 55 45 53 28 34 29 3b 20 5c  (x) VALUES(4); \
1650: 0d 0a 20 20 20 20 53 45 4c 45 43 54 20 78 20 46  ..    SELECT x F
1660: 52 4f 4d 20 74 31 20 4f 52 44 45 52 20 42 59 20  ROM t1 ORDER BY 
1670: 78 3b 20 5c 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 75  x; \..  }....  u
1680: 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e  nset -nocomplain
1690: 20 72 65 73 75 6c 74 73 20 65 72 72 6f 72 73 0d   results errors.
16a0: 0a 0d 0a 20 20 73 65 74 20 63 6f 64 65 20 5b 63  ...  set code [c
16b0: 6f 6d 70 69 6c 65 43 53 68 61 72 70 57 69 74 68  ompileCSharpWith
16c0: 20 5b 73 75 62 73 74 20 7b 0d 0a 20 20 20 20 75   [subst {..    u
16d0: 73 69 6e 67 20 53 79 73 74 65 6d 2e 44 61 74 61  sing System.Data
16e0: 2e 53 51 4c 69 74 65 3b 0d 0a 0d 0a 20 20 20 20  .SQLite;....    
16f0: 6e 61 6d 65 73 70 61 63 65 20 5f 44 79 6e 61 6d  namespace _Dynam
1700: 69 63 24 7b 69 64 7d 0d 0a 20 20 20 20 7b 0d 0a  ic${id}..    {..
1710: 20 20 20 20 20 20 70 75 62 6c 69 63 20 73 74 61        public sta
1720: 74 69 63 20 63 6c 61 73 73 20 54 65 73 74 24 7b  tic class Test${
1730: 69 64 7d 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20  id}..      {..  
1740: 20 20 20 20 20 20 70 72 69 76 61 74 65 20 73 74        private st
1750: 61 74 69 63 20 69 6e 74 20 63 6f 75 6e 74 20 3d  atic int count =
1760: 20 30 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 2f   0;....        /
1770: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
1780: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
1790: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
17a0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
17b0: 2f 2f 2f 2f 2f 2f 0d 0a 0d 0a 20 20 20 20 20 20  //////....      
17c0: 20 20 70 75 62 6c 69 63 20 73 74 61 74 69 63 20    public static 
17d0: 76 6f 69 64 20 4d 79 50 72 6f 67 72 65 73 73 48  void MyProgressH
17e0: 61 6e 64 6c 65 72 28 0d 0a 20 20 20 20 20 20 20  andler(..       
17f0: 20 20 20 6f 62 6a 65 63 74 20 73 65 6e 64 65 72     object sender
1800: 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 50 72 6f  ,..          Pro
1810: 67 72 65 73 73 45 76 65 6e 74 41 72 67 73 20 65  gressEventArgs e
1820: 0d 0a 20 20 20 20 20 20 20 20 20 20 29 0d 0a 20  ..          ).. 
1830: 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20         {..      
1840: 20 20 20 20 63 6f 75 6e 74 2b 2b 3b 0d 0a 20 20      count++;..  
1850: 20 20 20 20 20 20 20 20 65 2e 52 65 74 75 72 6e          e.Return
1860: 43 6f 64 65 20 3d 20 53 51 4c 69 74 65 50 72 6f  Code = SQLitePro
1870: 67 72 65 73 73 52 65 74 75 72 6e 43 6f 64 65 2e  gressReturnCode.
1880: 49 6e 74 65 72 72 75 70 74 3b 0d 0a 20 20 20 20  Interrupt;..    
1890: 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 20 20 20      }....       
18a0: 20 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f   ///////////////
18b0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
18c0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
18d0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
18e0: 2f 2f 2f 2f 2f 2f 2f 2f 0d 0a 0d 0a 20 20 20 20  ////////....    
18f0: 20 20 20 20 70 75 62 6c 69 63 20 73 74 61 74 69      public stati
1900: 63 20 69 6e 74 20 4d 61 69 6e 28 29 0d 0a 20 20  c int Main()..  
1910: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20        {..       
1920: 20 20 20 75 73 69 6e 67 20 28 53 51 4c 69 74 65     using (SQLite
1930: 43 6f 6e 6e 65 63 74 69 6f 6e 20 63 6f 6e 6e 65  Connection conne
1940: 63 74 69 6f 6e 20 3d 20 6e 65 77 20 53 51 4c 69  ction = new SQLi
1950: 74 65 43 6f 6e 6e 65 63 74 69 6f 6e 28 0d 0a 20  teConnection(.. 
1960: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 44 61               "Da
1970: 74 61 20 53 6f 75 72 63 65 3d 24 7b 64 61 74 61  ta Source=${data
1980: 53 6f 75 72 63 65 7d 3b 50 72 6f 67 72 65 73 73  Source};Progress
1990: 4f 70 73 3d 31 3b 5b 67 65 74 54 65 73 74 50 72  Ops=1;[getTestPr
19a0: 6f 70 65 72 74 69 65 73 5d 22 29 29 0d 0a 20 20  operties]"))..  
19b0: 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20          {..     
19c0: 20 20 20 20 20 20 20 63 6f 6e 6e 65 63 74 69 6f         connectio
19d0: 6e 2e 50 72 6f 67 72 65 73 73 20 2b 3d 20 4d 79  n.Progress += My
19e0: 50 72 6f 67 72 65 73 73 48 61 6e 64 6c 65 72 3b  ProgressHandler;
19f0: 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 63 6f  ..            co
1a00: 6e 6e 65 63 74 69 6f 6e 2e 4f 70 65 6e 28 29 3b  nnection.Open();
1a10: 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20  ....            
1a20: 75 73 69 6e 67 20 28 53 51 4c 69 74 65 43 6f 6d  using (SQLiteCom
1a30: 6d 61 6e 64 20 63 6f 6d 6d 61 6e 64 20 3d 20 6e  mand command = n
1a40: 65 77 20 53 51 4c 69 74 65 43 6f 6d 6d 61 6e 64  ew SQLiteCommand
1a50: 28 22 24 7b 73 71 6c 7d 22 2c 0d 0a 20 20 20 20  ("${sql}",..    
1a60: 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6e 6e              conn
1a70: 65 63 74 69 6f 6e 29 29 0d 0a 20 20 20 20 20 20  ection))..      
1a80: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20        {..       
1a90: 20 20 20 20 20 20 20 63 6f 6d 6d 61 6e 64 2e 45         command.E
1aa0: 78 65 63 75 74 65 4e 6f 6e 51 75 65 72 79 28 29  xecuteNonQuery()
1ab0: 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 7d  ;..            }
1ac0: 0d 0a 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 0d  ..          }...
1ad0: 0a 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72  .          retur
1ae0: 6e 20 63 6f 75 6e 74 3b 0d 0a 20 20 20 20 20 20  n count;..      
1af0: 20 20 7d 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20    }..      }..  
1b00: 20 20 7d 0d 0a 20 20 7d 5d 20 74 72 75 65 20 74    }..  }] true t
1b10: 72 75 65 20 74 72 75 65 20 72 65 73 75 6c 74 73  rue true results
1b20: 20 65 72 72 6f 72 73 20 53 79 73 74 65 6d 2e 44   errors System.D
1b30: 61 74 61 2e 53 51 4c 69 74 65 2e 64 6c 6c 5d 0d  ata.SQLite.dll].
1b40: 0a 0d 0a 20 20 6c 69 73 74 20 24 63 6f 64 65 20  ...  list $code 
1b50: 24 72 65 73 75 6c 74 73 20 5c 0d 0a 20 20 20 20  $results \..    
1b60: 20 20 5b 65 78 70 72 20 7b 5b 69 6e 66 6f 20 65    [expr {[info e
1b70: 78 69 73 74 73 20 65 72 72 6f 72 73 5d 20 3f 20  xists errors] ? 
1b80: 24 65 72 72 6f 72 73 20 3a 20 22 22 7d 5d 20 5c  $errors : ""}] \
1b90: 0d 0a 20 20 20 20 20 20 5b 65 78 70 72 20 7b 24  ..      [expr {$
1ba0: 63 6f 64 65 20 65 71 20 22 4f 6b 22 20 3f 20 5b  code eq "Ok" ? [
1bb0: 63 61 74 63 68 20 7b 0d 0a 20 20 20 20 20 20 20  catch {..       
1bc0: 20 6f 62 6a 65 63 74 20 69 6e 76 6f 6b 65 20 5f   object invoke _
1bd0: 44 79 6e 61 6d 69 63 24 7b 69 64 7d 2e 54 65 73  Dynamic${id}.Tes
1be0: 74 24 7b 69 64 7d 20 4d 61 69 6e 0d 0a 20 20 20  t${id} Main..   
1bf0: 20 20 20 7d 20 72 65 73 75 6c 74 5d 20 3a 20 5b     } result] : [
1c00: 73 65 74 20 72 65 73 75 6c 74 20 22 22 5d 7d 5d  set result ""]}]
1c10: 20 24 72 65 73 75 6c 74 20 5c 0d 0a 20 20 20 20   $result \..    
1c20: 20 20 5b 65 78 70 72 20 7b 5b 73 74 72 69 6e 67    [expr {[string
1c30: 20 69 73 20 69 6e 74 65 67 65 72 20 2d 73 74 72   is integer -str
1c40: 69 63 74 20 24 72 65 73 75 6c 74 5d 20 26 26 20  ict $result] && 
1c50: 24 72 65 73 75 6c 74 20 3e 20 30 20 3f 20 31 20  $result > 0 ? 1 
1c60: 3a 20 30 7d 5d 0d 0a 7d 20 2d 63 6c 65 61 6e 75  : 0}]..} -cleanu
1c70: 70 20 7b 0d 0a 20 20 63 6c 65 61 6e 75 70 44 62  p {..  cleanupDb
1c80: 20 24 66 69 6c 65 4e 61 6d 65 0d 0a 0d 0a 20 20   $fileName....  
1c90: 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69  unset -nocomplai
1ca0: 6e 20 72 65 73 75 6c 74 20 72 65 73 75 6c 74 73  n result results
1cb0: 20 65 72 72 6f 72 73 20 63 6f 64 65 20 73 71 6c   errors code sql
1cc0: 20 64 61 74 61 53 6f 75 72 63 65 20 69 64 20 64   dataSource id d
1cd0: 62 20 66 69 6c 65 4e 61 6d 65 0d 0a 7d 20 2d 63  b fileName..} -c
1ce0: 6f 6e 73 74 72 61 69 6e 74 73 20 7b 65 61 67 6c  onstraints {eagl
1cf0: 65 20 63 6f 6d 6d 61 6e 64 2e 6f 62 6a 65 63 74  e command.object
1d00: 20 6d 6f 6e 6f 42 75 67 32 38 20 63 6f 6d 6d 61   monoBug28 comma
1d10: 6e 64 2e 73 71 6c 20 63 6f 6d 70 69 6c 65 2e 44  nd.sql compile.D
1d20: 41 54 41 20 53 51 4c 69 74 65 5c 0d 0a 53 79 73  ATA SQLite\..Sys
1d30: 74 65 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 20  tem.Data.SQLite 
1d40: 63 6f 6d 70 69 6c 65 43 53 68 61 72 70 7d 20 2d  compileCSharp} -
1d50: 6d 61 74 63 68 20 72 65 67 65 78 70 20 2d 72 65  match regexp -re
1d60: 73 75 6c 74 20 7b 5e 4f 6b 5c 0d 0a 53 79 73 74  sult {^Ok\..Syst
1d70: 65 6d 23 43 6f 64 65 44 6f 6d 23 43 6f 6d 70 69  em#CodeDom#Compi
1d80: 6c 65 72 23 43 6f 6d 70 69 6c 65 72 52 65 73 75  ler#CompilerResu
1d90: 6c 74 73 23 5c 64 2b 20 5c 7b 5c 7d 20 30 20 5c  lts#\d+ \{\} 0 \
1da0: 64 2b 20 31 24 7d 7d 0d 0a 0d 0a 23 23 23 23 23  d+ 1$}}....#####
1db0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1dc0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1dd0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1de0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1df0: 23 23 23 23 23 23 23 23 23 23 0d 0a 0d 0a 72 75  ##########....ru
1e00: 6e 54 65 73 74 20 7b 74 65 73 74 20 70 72 6f 67  nTest {test prog
1e10: 72 65 73 73 2d 31 2e 34 20 7b 70 72 6f 67 72 65  ress-1.4 {progre
1e20: 73 73 20 77 69 74 68 20 65 78 63 65 70 74 69 6f  ss with exceptio
1e30: 6e 7d 20 2d 73 65 74 75 70 20 7b 0d 0a 20 20 73  n} -setup {..  s
1e40: 65 74 75 70 44 62 20 5b 73 65 74 20 66 69 6c 65  etupDb [set file
1e50: 4e 61 6d 65 20 70 72 6f 67 72 65 73 73 2d 31 2e  Name progress-1.
1e60: 34 2e 64 62 5d 0d 0a 7d 20 2d 62 6f 64 79 20 7b  4.db]..} -body {
1e70: 0d 0a 20 20 73 65 74 20 69 64 20 5b 6f 62 6a 65  ..  set id [obje
1e80: 63 74 20 69 6e 76 6f 6b 65 20 49 6e 74 65 72 70  ct invoke Interp
1e90: 72 65 74 65 72 2e 47 65 74 41 63 74 69 76 65 20  reter.GetActive 
1ea0: 4e 65 78 74 49 64 5d 0d 0a 20 20 73 65 74 20 64  NextId]..  set d
1eb0: 61 74 61 53 6f 75 72 63 65 20 5b 66 69 6c 65 20  ataSource [file 
1ec0: 6a 6f 69 6e 20 5b 67 65 74 44 61 74 61 62 61 73  join [getDatabas
1ed0: 65 44 69 72 65 63 74 6f 72 79 5d 20 24 66 69 6c  eDirectory] $fil
1ee0: 65 4e 61 6d 65 5d 0d 0a 0d 0a 20 20 73 65 74 20  eName]....  set 
1ef0: 73 71 6c 20 7b 20 5c 0d 0a 20 20 20 20 43 52 45  sql { \..    CRE
1f00: 41 54 45 20 54 41 42 4c 45 20 74 31 28 78 20 49  ATE TABLE t1(x I
1f10: 4e 54 45 47 45 52 29 3b 20 5c 0d 0a 20 20 20 20  NTEGER); \..    
1f20: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 28  INSERT INTO t1 (
1f30: 78 29 20 56 41 4c 55 45 53 28 31 29 3b 20 5c 0d  x) VALUES(1); \.
1f40: 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f  .    INSERT INTO
1f50: 20 74 31 20 28 78 29 20 56 41 4c 55 45 53 28 32   t1 (x) VALUES(2
1f60: 29 3b 20 5c 0d 0a 20 20 20 20 49 4e 53 45 52 54  ); \..    INSERT
1f70: 20 49 4e 54 4f 20 74 31 20 28 78 29 20 56 41 4c   INTO t1 (x) VAL
1f80: 55 45 53 28 33 29 3b 20 5c 0d 0a 20 20 20 20 49  UES(3); \..    I
1f90: 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 28 78  NSERT INTO t1 (x
1fa0: 29 20 56 41 4c 55 45 53 28 34 29 3b 20 5c 0d 0a  ) VALUES(4); \..
1fb0: 20 20 20 20 53 45 4c 45 43 54 20 78 20 46 52 4f      SELECT x FRO
1fc0: 4d 20 74 31 20 4f 52 44 45 52 20 42 59 20 78 3b  M t1 ORDER BY x;
1fd0: 20 5c 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 75 6e 73   \..  }....  uns
1fe0: 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20 72  et -nocomplain r
1ff0: 65 73 75 6c 74 73 20 65 72 72 6f 72 73 0d 0a 0d  esults errors...
2000: 0a 20 20 73 65 74 20 63 6f 64 65 20 5b 63 6f 6d  .  set code [com
2010: 70 69 6c 65 43 53 68 61 72 70 57 69 74 68 20 5b  pileCSharpWith [
2020: 73 75 62 73 74 20 7b 0d 0a 20 20 20 20 75 73 69  subst {..    usi
2030: 6e 67 20 53 79 73 74 65 6d 3b 0d 0a 20 20 20 20  ng System;..    
2040: 75 73 69 6e 67 20 53 79 73 74 65 6d 2e 44 61 74  using System.Dat
2050: 61 2e 53 51 4c 69 74 65 3b 0d 0a 0d 0a 20 20 20  a.SQLite;....   
2060: 20 6e 61 6d 65 73 70 61 63 65 20 5f 44 79 6e 61   namespace _Dyna
2070: 6d 69 63 24 7b 69 64 7d 0d 0a 20 20 20 20 7b 0d  mic${id}..    {.
2080: 0a 20 20 20 20 20 20 70 75 62 6c 69 63 20 73 74  .      public st
2090: 61 74 69 63 20 63 6c 61 73 73 20 54 65 73 74 24  atic class Test$
20a0: 7b 69 64 7d 0d 0a 20 20 20 20 20 20 7b 0d 0a 20  {id}..      {.. 
20b0: 20 20 20 20 20 20 20 70 72 69 76 61 74 65 20 73         private s
20c0: 74 61 74 69 63 20 69 6e 74 20 63 6f 75 6e 74 20  tatic int count 
20d0: 3d 20 30 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20  = 0;....        
20e0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
20f0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
2100: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
2110: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
2120: 2f 2f 2f 2f 2f 2f 2f 0d 0a 0d 0a 20 20 20 20 20  ///////....     
2130: 20 20 20 70 75 62 6c 69 63 20 73 74 61 74 69 63     public static
2140: 20 76 6f 69 64 20 4d 79 50 72 6f 67 72 65 73 73   void MyProgress
2150: 48 61 6e 64 6c 65 72 28 0d 0a 20 20 20 20 20 20  Handler(..      
2160: 20 20 20 20 6f 62 6a 65 63 74 20 73 65 6e 64 65      object sende
2170: 72 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 50 72  r,..          Pr
2180: 6f 67 72 65 73 73 45 76 65 6e 74 41 72 67 73 20  ogressEventArgs 
2190: 65 0d 0a 20 20 20 20 20 20 20 20 20 20 29 0d 0a  e..          )..
21a0: 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20          {..     
21b0: 20 20 20 20 20 63 6f 75 6e 74 2b 2b 3b 0d 0a 20       count++;.. 
21c0: 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 20 6e           throw n
21d0: 65 77 20 45 78 63 65 70 74 69 6f 6e 28 29 3b 0d  ew Exception();.
21e0: 0a 20 20 20 20 20 20 20 20 7d 0d 0a 0d 0a 20 20  .        }....  
21f0: 20 20 20 20 20 20 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f        //////////
2200: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
2210: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
2220: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
2230: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 0d 0a 0d  /////////////...
2240: 0a 20 20 20 20 20 20 20 20 70 75 62 6c 69 63 20  .        public 
2250: 73 74 61 74 69 63 20 69 6e 74 20 4d 61 69 6e 28  static int Main(
2260: 29 0d 0a 20 20 20 20 20 20 20 20 7b 0d 0a 20 20  )..        {..  
2270: 20 20 20 20 20 20 20 20 75 73 69 6e 67 20 28 53          using (S
2280: 51 4c 69 74 65 43 6f 6e 6e 65 63 74 69 6f 6e 20  QLiteConnection 
2290: 63 6f 6e 6e 65 63 74 69 6f 6e 20 3d 20 6e 65 77  connection = new
22a0: 20 53 51 4c 69 74 65 43 6f 6e 6e 65 63 74 69 6f   SQLiteConnectio
22b0: 6e 28 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20  n(..            
22c0: 20 20 22 44 61 74 61 20 53 6f 75 72 63 65 3d 24    "Data Source=$
22d0: 7b 64 61 74 61 53 6f 75 72 63 65 7d 3b 50 72 6f  {dataSource};Pro
22e0: 67 72 65 73 73 4f 70 73 3d 31 3b 5b 67 65 74 54  gressOps=1;[getT
22f0: 65 73 74 50 72 6f 70 65 72 74 69 65 73 5d 22 29  estProperties]")
2300: 29 0d 0a 20 20 20 20 20 20 20 20 20 20 7b 0d 0a  )..          {..
2310: 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6e 6e              conn
2320: 65 63 74 69 6f 6e 2e 50 72 6f 67 72 65 73 73 20  ection.Progress 
2330: 2b 3d 20 4d 79 50 72 6f 67 72 65 73 73 48 61 6e  += MyProgressHan
2340: 64 6c 65 72 3b 0d 0a 20 20 20 20 20 20 20 20 20  dler;..         
2350: 20 20 20 63 6f 6e 6e 65 63 74 69 6f 6e 2e 4f 70     connection.Op
2360: 65 6e 28 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 20  en();....       
2370: 20 20 20 20 20 75 73 69 6e 67 20 28 53 51 4c 69       using (SQLi
2380: 74 65 43 6f 6d 6d 61 6e 64 20 63 6f 6d 6d 61 6e  teCommand comman
2390: 64 20 3d 20 6e 65 77 20 53 51 4c 69 74 65 43 6f  d = new SQLiteCo
23a0: 6d 6d 61 6e 64 28 22 24 7b 73 71 6c 7d 22 2c 0d  mmand("${sql}",.
23b0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
23c0: 20 63 6f 6e 6e 65 63 74 69 6f 6e 29 29 0d 0a 20   connection)).. 
23d0: 20 20 20 20 20 20 20 20 20 20 20 7b 0d 0a 20 20             {..  
23e0: 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6d 6d              comm
23f0: 61 6e 64 2e 45 78 65 63 75 74 65 4e 6f 6e 51 75  and.ExecuteNonQu
2400: 65 72 79 28 29 3b 0d 0a 20 20 20 20 20 20 20 20  ery();..        
2410: 20 20 20 20 7d 0d 0a 20 20 20 20 20 20 20 20 20      }..         
2420: 20 7d 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 20   }....          
2430: 72 65 74 75 72 6e 20 63 6f 75 6e 74 3b 0d 0a 20  return count;.. 
2440: 20 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 20 20         }..      
2450: 7d 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 5d 20 74  }..    }..  }] t
2460: 72 75 65 20 74 72 75 65 20 74 72 75 65 20 72 65  rue true true re
2470: 73 75 6c 74 73 20 65 72 72 6f 72 73 20 53 79 73  sults errors Sys
2480: 74 65 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e  tem.Data.SQLite.
2490: 64 6c 6c 5d 0d 0a 0d 0a 20 20 6c 69 73 74 20 24  dll]....  list $
24a0: 63 6f 64 65 20 24 72 65 73 75 6c 74 73 20 5c 0d  code $results \.
24b0: 0a 20 20 20 20 20 20 5b 65 78 70 72 20 7b 5b 69  .      [expr {[i
24c0: 6e 66 6f 20 65 78 69 73 74 73 20 65 72 72 6f 72  nfo exists error
24d0: 73 5d 20 3f 20 24 65 72 72 6f 72 73 20 3a 20 22  s] ? $errors : "
24e0: 22 7d 5d 20 5c 0d 0a 20 20 20 20 20 20 5b 65 78  "}] \..      [ex
24f0: 70 72 20 7b 24 63 6f 64 65 20 65 71 20 22 4f 6b  pr {$code eq "Ok
2500: 22 20 3f 20 5b 63 61 74 63 68 20 7b 0d 0a 20 20  " ? [catch {..  
2510: 20 20 20 20 20 20 6f 62 6a 65 63 74 20 69 6e 76        object inv
2520: 6f 6b 65 20 5f 44 79 6e 61 6d 69 63 24 7b 69 64  oke _Dynamic${id
2530: 7d 2e 54 65 73 74 24 7b 69 64 7d 20 4d 61 69 6e  }.Test${id} Main
2540: 0d 0a 20 20 20 20 20 20 7d 20 72 65 73 75 6c 74  ..      } result
2550: 5d 20 3a 20 5b 73 65 74 20 72 65 73 75 6c 74 20  ] : [set result 
2560: 22 22 5d 7d 5d 20 24 72 65 73 75 6c 74 20 5c 0d  ""]}] $result \.
2570: 0a 20 20 20 20 20 20 5b 65 78 70 72 20 7b 5b 73  .      [expr {[s
2580: 74 72 69 6e 67 20 69 73 20 69 6e 74 65 67 65 72  tring is integer
2590: 20 2d 73 74 72 69 63 74 20 24 72 65 73 75 6c 74   -strict $result
25a0: 5d 20 26 26 20 24 72 65 73 75 6c 74 20 3e 20 30  ] && $result > 0
25b0: 20 3f 20 31 20 3a 20 30 7d 5d 0d 0a 7d 20 2d 63   ? 1 : 0}]..} -c
25c0: 6c 65 61 6e 75 70 20 7b 0d 0a 20 20 63 6c 65 61  leanup {..  clea
25d0: 6e 75 70 44 62 20 24 66 69 6c 65 4e 61 6d 65 0d  nupDb $fileName.
25e0: 0a 0d 0a 20 20 75 6e 73 65 74 20 2d 6e 6f 63 6f  ...  unset -noco
25f0: 6d 70 6c 61 69 6e 20 72 65 73 75 6c 74 20 72 65  mplain result re
2600: 73 75 6c 74 73 20 65 72 72 6f 72 73 20 63 6f 64  sults errors cod
2610: 65 20 73 71 6c 20 64 61 74 61 53 6f 75 72 63 65  e sql dataSource
2620: 20 69 64 20 64 62 20 66 69 6c 65 4e 61 6d 65 0d   id db fileName.
2630: 0a 7d 20 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  .} -constraints 
2640: 7b 65 61 67 6c 65 20 63 6f 6d 6d 61 6e 64 2e 6f  {eagle command.o
2650: 62 6a 65 63 74 20 6d 6f 6e 6f 42 75 67 32 38 20  bject monoBug28 
2660: 63 6f 6d 6d 61 6e 64 2e 73 71 6c 20 63 6f 6d 70  command.sql comp
2670: 69 6c 65 2e 44 41 54 41 20 53 51 4c 69 74 65 5c  ile.DATA SQLite\
2680: 0d 0a 53 79 73 74 65 6d 2e 44 61 74 61 2e 53 51  ..System.Data.SQ
2690: 4c 69 74 65 20 63 6f 6d 70 69 6c 65 43 53 68 61  Lite compileCSha
26a0: 72 70 7d 20 2d 6d 61 74 63 68 20 72 65 67 65 78  rp} -match regex
26b0: 70 20 2d 72 65 73 75 6c 74 20 7b 5e 4f 6b 5c 0d  p -result {^Ok\.
26c0: 0a 53 79 73 74 65 6d 23 43 6f 64 65 44 6f 6d 23  .System#CodeDom#
26d0: 43 6f 6d 70 69 6c 65 72 23 43 6f 6d 70 69 6c 65  Compiler#Compile
26e0: 72 52 65 73 75 6c 74 73 23 5c 64 2b 20 5c 7b 5c  rResults#\d+ \{\
26f0: 7d 20 30 20 5c 64 2b 20 31 24 7d 7d 0d 0a 0d 0a  } 0 \d+ 1$}}....
2700: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
2710: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
2720: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
2730: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
2740: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 0d  ###############.
2750: 0a 0d 0a 72 75 6e 53 51 4c 69 74 65 54 65 73 74  ...runSQLiteTest
2760: 45 70 69 6c 6f 67 75 65 0d 0a 72 75 6e 54 65 73  Epilogue..runTes
2770: 74 45 70 69 6c 6f 67 75 65 0d 0a                 tEpilogue..