System.Data.SQLite
Hex Artifact Content
Not logged in

Artifact e810888dd7a4fd0b1071ded3cebfd854f36550b0:


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 38 64 39 32 38 63  .#..# tkt-8d928c
0060: 33 65 38 38 2e 65 61 67 6c 65 20 2d 2d 0d 0a 23  3e88.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 2e 4c 69 62 72 61  uire Eagle.Libra
0150: 72 79 0d 0a 70 61 63 6b 61 67 65 20 72 65 71 75  ry..package requ
0160: 69 72 65 20 45 61 67 6c 65 2e 54 65 73 74 0d 0a  ire Eagle.Test..
0170: 0d 0a 72 75 6e 54 65 73 74 50 72 6f 6c 6f 67 75  ..runTestPrologu
0180: 65 0d 0a 0d 0a 23 23 23 23 23 23 23 23 23 23 23  e....###########
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 23 23 0d 0a 0d 0a 70 61 63 6b 61 67 65 20  ####....package 
01e0: 72 65 71 75 69 72 65 20 53 79 73 74 65 6d 2e 44  require System.D
01f0: 61 74 61 2e 53 51 4c 69 74 65 2e 54 65 73 74 0d  ata.SQLite.Test.
0200: 0a 72 75 6e 53 51 4c 69 74 65 54 65 73 74 50 72  .runSQLiteTestPr
0210: 6f 6c 6f 67 75 65 0d 0a 72 75 6e 53 51 4c 69 74  ologue..runSQLit
0220: 65 54 65 73 74 46 69 6c 65 73 50 72 6f 6c 6f 67  eTestFilesProlog
0230: 75 65 0d 0a 0d 0a 23 23 23 23 23 23 23 23 23 23  ue....##########
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 23 23 23 23 23 23 23 23 23  ################
0270: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0280: 23 23 23 23 23 0d 0a 0d 0a 72 75 6e 54 65 73 74  #####....runTest
0290: 20 7b 74 65 73 74 20 74 6b 74 2d 38 64 39 32 38   {test tkt-8d928
02a0: 63 33 65 38 38 2d 31 2e 31 20 7b 4c 49 4e 51 20  c3e88-1.1 {LINQ 
02b0: 77 2f 42 69 6e 61 72 79 47 55 49 44 3d 66 61 6c  w/BinaryGUID=fal
02c0: 73 65 7d 20 2d 62 6f 64 79 20 7b 0d 0a 20 20 23  se} -body {..  #
02d0: 0d 0a 20 20 23 20 4e 4f 54 45 3a 20 52 65 2d 63  ..  # NOTE: Re-c
02e0: 6f 70 79 20 74 68 65 20 72 65 66 65 72 65 6e 63  opy the referenc
02f0: 65 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 20  e database file 
0300: 75 73 65 64 20 66 6f 72 20 74 68 69 73 20 75 6e  used for this un
0310: 69 74 20 74 65 73 74 20 74 6f 20 74 68 65 0d 0a  it test to the..
0320: 20 20 23 20 20 20 20 20 20 20 62 75 69 6c 64 20    #       build 
0330: 64 69 72 65 63 74 6f 72 79 20 69 6e 20 63 61 73  directory in cas
0340: 65 20 69 74 20 68 61 73 20 62 65 65 6e 20 63 68  e it has been ch
0350: 61 6e 67 65 64 20 62 79 20 61 20 70 72 65 76 69  anged by a previ
0360: 6f 75 73 20 74 65 73 74 20 72 75 6e 2e 0d 0a 20  ous test run... 
0370: 20 23 0d 0a 20 20 66 69 6c 65 20 63 6f 70 79 20   #..  file copy 
0380: 2d 66 6f 72 63 65 20 24 6e 6f 72 74 68 77 69 6e  -force $northwin
0390: 64 45 66 44 62 46 69 6c 65 20 5c 0d 0a 20 20 20  dEfDbFile \..   
03a0: 20 20 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b 67     [file join [g
03b0: 65 74 42 75 69 6c 64 44 69 72 65 63 74 6f 72 79  etBuildDirectory
03c0: 5d 20 5b 66 69 6c 65 20 74 61 69 6c 20 24 6e 6f  ] [file tail $no
03d0: 72 74 68 77 69 6e 64 45 66 44 62 46 69 6c 65 5d  rthwindEfDbFile]
03e0: 5d 0d 0a 0d 0a 20 20 73 65 74 20 72 65 73 75 6c  ]....  set resul
03f0: 74 20 5b 6c 69 73 74 5d 0d 0a 20 20 73 65 74 20  t [list]..  set 
0400: 6f 75 74 70 75 74 20 22 22 0d 0a 0d 0a 20 20 73  output ""....  s
0410: 65 74 20 63 6f 64 65 20 5b 63 61 74 63 68 20 7b  et code [catch {
0420: 0d 0a 20 20 20 20 74 65 73 74 43 6c 72 45 78 65  ..    testClrExe
0430: 63 20 24 74 65 73 74 4c 69 6e 71 45 78 65 46 69  c $testLinqExeFi
0440: 6c 65 20 5b 6c 69 73 74 20 2d 65 76 65 6e 74 66  le [list -eventf
0450: 6c 61 67 73 20 57 61 69 74 20 2d 64 69 72 65 63  lags Wait -direc
0460: 74 6f 72 79 20 5c 0d 0a 20 20 20 20 20 20 20 20  tory \..        
0470: 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 24 74  [file dirname $t
0480: 65 73 74 4c 69 6e 71 45 78 65 46 69 6c 65 5d 20  estLinqExeFile] 
0490: 2d 6e 6f 63 61 72 72 69 61 67 65 72 65 74 75 72  -nocarriageretur
04a0: 6e 73 20 2d 73 74 64 6f 75 74 20 6f 75 74 70 75  ns -stdout outpu
04b0: 74 20 5c 0d 0a 20 20 20 20 20 20 20 20 2d 73 75  t \..        -su
04c0: 63 63 65 73 73 20 30 5d 20 2d 62 69 6e 61 72 79  ccess 0] -binary
04d0: 67 75 69 64 20 66 61 6c 73 65 0d 0a 20 20 7d 20  guid false..  } 
04e0: 65 72 72 6f 72 5d 0d 0a 0d 0a 20 20 74 6c 6f 67  error]....  tlog
04f0: 20 22 2d 2d 2d 2d 20 42 45 47 49 4e 20 53 54 44   "---- BEGIN STD
0500: 4f 55 54 20 4f 55 54 50 55 54 5c 6e 22 0d 0a 20  OUT OUTPUT\n".. 
0510: 20 74 6c 6f 67 20 24 6f 75 74 70 75 74 0d 0a 20   tlog $output.. 
0520: 20 74 6c 6f 67 20 22 5c 6e 2d 2d 2d 2d 20 45 4e   tlog "\n---- EN
0530: 44 20 53 54 44 4f 55 54 20 4f 55 54 50 55 54 5c  D STDOUT OUTPUT\
0540: 6e 22 0d 0a 0d 0a 20 20 6c 61 70 70 65 6e 64 20  n"....  lappend 
0550: 72 65 73 75 6c 74 20 24 63 6f 64 65 0d 0a 0d 0a  result $code....
0560: 20 20 69 66 20 7b 24 63 6f 64 65 20 3d 3d 20 30    if {$code == 0
0570: 7d 20 74 68 65 6e 20 7b 0d 0a 20 20 20 20 6c 61  } then {..    la
0580: 70 70 65 6e 64 20 72 65 73 75 6c 74 20 5b 73 74  ppend result [st
0590: 72 69 6e 67 20 74 72 69 6d 20 24 6f 75 74 70 75  ring trim $outpu
05a0: 74 5d 0d 0a 20 20 7d 20 65 6c 73 65 20 7b 0d 0a  t]..  } else {..
05b0: 20 20 20 20 6c 61 70 70 65 6e 64 20 72 65 73 75      lappend resu
05c0: 6c 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20  lt [string trim 
05d0: 24 65 72 72 6f 72 5d 0d 0a 20 20 7d 0d 0a 0d 0a  $error]..  }....
05e0: 20 20 73 65 74 20 72 65 73 75 6c 74 0d 0a 7d 20    set result..} 
05f0: 2d 63 6c 65 61 6e 75 70 20 7b 0d 0a 20 20 75 6e  -cleanup {..  un
0600: 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20  set -nocomplain 
0610: 63 6f 64 65 20 6f 75 74 70 75 74 20 65 72 72 6f  code output erro
0620: 72 20 72 65 73 75 6c 74 0d 0a 7d 20 2d 63 6f 6e  r result..} -con
0630: 73 74 72 61 69 6e 74 73 20 7b 65 61 67 6c 65 20  straints {eagle 
0640: 6d 6f 6e 6f 54 6f 44 6f 20 53 51 4c 69 74 65 20  monoToDo SQLite 
0650: 66 69 6c 65 5f 53 79 73 74 65 6d 2e 44 61 74 61  file_System.Data
0660: 2e 53 51 4c 69 74 65 2e 64 6c 6c 20 74 65 73 74  .SQLite.dll test
0670: 45 78 65 63 5c 0d 0a 66 69 6c 65 5f 53 79 73 74  Exec\..file_Syst
0680: 65 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e 4c  em.Data.SQLite.L
0690: 69 6e 71 2e 64 6c 6c 20 66 69 6c 65 5f 74 65 73  inq.dll file_tes
06a0: 74 6c 69 6e 71 2e 65 78 65 20 66 69 6c 65 5f 6e  tlinq.exe file_n
06b0: 6f 72 74 68 77 69 6e 64 45 46 2e 64 62 7d 20 5c  orthwindEF.db} \
06c0: 0d 0a 2d 72 65 73 75 6c 74 20 7b 30 20 32 64 33  ..-result {0 2d3
06d0: 64 32 64 33 64 2d 32 64 33 64 2d 32 64 33 64 2d  d2d3d-2d3d-2d3d-
06e0: 32 64 33 64 2d 32 64 33 64 32 64 33 64 32 64 33  2d3d-2d3d2d3d2d3
06f0: 64 7d 7d 0d 0a 0d 0a 23 23 23 23 23 23 23 23 23  d}}....#########
0700: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0710: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0720: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0730: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0740: 23 23 23 23 23 23 0d 0a 0d 0a 72 75 6e 54 65 73  ######....runTes
0750: 74 20 7b 74 65 73 74 20 74 6b 74 2d 38 64 39 32  t {test tkt-8d92
0760: 38 63 33 65 38 38 2d 31 2e 32 20 7b 4c 49 4e 51  8c3e88-1.2 {LINQ
0770: 20 77 2f 42 69 6e 61 72 79 47 55 49 44 3d 74 72   w/BinaryGUID=tr
0780: 75 65 7d 20 2d 62 6f 64 79 20 7b 0d 0a 20 20 23  ue} -body {..  #
0790: 0d 0a 20 20 23 20 4e 4f 54 45 3a 20 52 65 2d 63  ..  # NOTE: Re-c
07a0: 6f 70 79 20 74 68 65 20 72 65 66 65 72 65 6e 63  opy the referenc
07b0: 65 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 20  e database file 
07c0: 75 73 65 64 20 66 6f 72 20 74 68 69 73 20 75 6e  used for this un
07d0: 69 74 20 74 65 73 74 20 74 6f 20 74 68 65 0d 0a  it test to the..
07e0: 20 20 23 20 20 20 20 20 20 20 62 75 69 6c 64 20    #       build 
07f0: 64 69 72 65 63 74 6f 72 79 20 69 6e 20 63 61 73  directory in cas
0800: 65 20 69 74 20 68 61 73 20 62 65 65 6e 20 63 68  e it has been ch
0810: 61 6e 67 65 64 20 62 79 20 61 20 70 72 65 76 69  anged by a previ
0820: 6f 75 73 20 74 65 73 74 20 72 75 6e 2e 0d 0a 20  ous test run... 
0830: 20 23 0d 0a 20 20 66 69 6c 65 20 63 6f 70 79 20   #..  file copy 
0840: 2d 66 6f 72 63 65 20 24 6e 6f 72 74 68 77 69 6e  -force $northwin
0850: 64 45 66 44 62 46 69 6c 65 20 5c 0d 0a 20 20 20  dEfDbFile \..   
0860: 20 20 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b 67     [file join [g
0870: 65 74 42 75 69 6c 64 44 69 72 65 63 74 6f 72 79  etBuildDirectory
0880: 5d 20 5b 66 69 6c 65 20 74 61 69 6c 20 24 6e 6f  ] [file tail $no
0890: 72 74 68 77 69 6e 64 45 66 44 62 46 69 6c 65 5d  rthwindEfDbFile]
08a0: 5d 0d 0a 0d 0a 20 20 73 65 74 20 72 65 73 75 6c  ]....  set resul
08b0: 74 20 5b 6c 69 73 74 5d 0d 0a 20 20 73 65 74 20  t [list]..  set 
08c0: 6f 75 74 70 75 74 20 22 22 0d 0a 0d 0a 20 20 73  output ""....  s
08d0: 65 74 20 63 6f 64 65 20 5b 63 61 74 63 68 20 7b  et code [catch {
08e0: 0d 0a 20 20 20 20 74 65 73 74 43 6c 72 45 78 65  ..    testClrExe
08f0: 63 20 24 74 65 73 74 4c 69 6e 71 45 78 65 46 69  c $testLinqExeFi
0900: 6c 65 20 5b 6c 69 73 74 20 2d 65 76 65 6e 74 66  le [list -eventf
0910: 6c 61 67 73 20 57 61 69 74 20 2d 64 69 72 65 63  lags Wait -direc
0920: 74 6f 72 79 20 5c 0d 0a 20 20 20 20 20 20 20 20  tory \..        
0930: 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 24 74  [file dirname $t
0940: 65 73 74 4c 69 6e 71 45 78 65 46 69 6c 65 5d 20  estLinqExeFile] 
0950: 2d 6e 6f 63 61 72 72 69 61 67 65 72 65 74 75 72  -nocarriageretur
0960: 6e 73 20 2d 73 74 64 6f 75 74 20 6f 75 74 70 75  ns -stdout outpu
0970: 74 20 5c 0d 0a 20 20 20 20 20 20 20 20 2d 73 75  t \..        -su
0980: 63 63 65 73 73 20 30 5d 20 2d 62 69 6e 61 72 79  ccess 0] -binary
0990: 67 75 69 64 20 74 72 75 65 0d 0a 20 20 7d 20 65  guid true..  } e
09a0: 72 72 6f 72 5d 0d 0a 0d 0a 20 20 74 6c 6f 67 20  rror]....  tlog 
09b0: 22 2d 2d 2d 2d 20 42 45 47 49 4e 20 53 54 44 4f  "---- BEGIN STDO
09c0: 55 54 20 4f 55 54 50 55 54 5c 6e 22 0d 0a 20 20  UT OUTPUT\n"..  
09d0: 74 6c 6f 67 20 24 6f 75 74 70 75 74 0d 0a 20 20  tlog $output..  
09e0: 74 6c 6f 67 20 22 5c 6e 2d 2d 2d 2d 20 45 4e 44  tlog "\n---- END
09f0: 20 53 54 44 4f 55 54 20 4f 55 54 50 55 54 5c 6e   STDOUT OUTPUT\n
0a00: 22 0d 0a 0d 0a 20 20 6c 61 70 70 65 6e 64 20 72  "....  lappend r
0a10: 65 73 75 6c 74 20 24 63 6f 64 65 0d 0a 0d 0a 20  esult $code.... 
0a20: 20 69 66 20 7b 24 63 6f 64 65 20 3d 3d 20 30 7d   if {$code == 0}
0a30: 20 74 68 65 6e 20 7b 0d 0a 20 20 20 20 6c 61 70   then {..    lap
0a40: 70 65 6e 64 20 72 65 73 75 6c 74 20 5b 73 74 72  pend result [str
0a50: 69 6e 67 20 74 72 69 6d 20 24 6f 75 74 70 75 74  ing trim $output
0a60: 5d 0d 0a 20 20 7d 20 65 6c 73 65 20 7b 0d 0a 20  ]..  } else {.. 
0a70: 20 20 20 6c 61 70 70 65 6e 64 20 72 65 73 75 6c     lappend resul
0a80: 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 24  t [string trim $
0a90: 65 72 72 6f 72 5d 0d 0a 20 20 7d 0d 0a 0d 0a 20  error]..  }.... 
0aa0: 20 73 65 74 20 72 65 73 75 6c 74 0d 0a 7d 20 2d   set result..} -
0ab0: 63 6c 65 61 6e 75 70 20 7b 0d 0a 20 20 75 6e 73  cleanup {..  uns
0ac0: 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20 63  et -nocomplain c
0ad0: 6f 64 65 20 6f 75 74 70 75 74 20 65 72 72 6f 72  ode output error
0ae0: 20 72 65 73 75 6c 74 0d 0a 7d 20 2d 63 6f 6e 73   result..} -cons
0af0: 74 72 61 69 6e 74 73 20 7b 65 61 67 6c 65 20 6d  traints {eagle m
0b00: 6f 6e 6f 54 6f 44 6f 20 53 51 4c 69 74 65 20 66  onoToDo SQLite f
0b10: 69 6c 65 5f 53 79 73 74 65 6d 2e 44 61 74 61 2e  ile_System.Data.
0b20: 53 51 4c 69 74 65 2e 64 6c 6c 20 74 65 73 74 45  SQLite.dll testE
0b30: 78 65 63 5c 0d 0a 66 69 6c 65 5f 53 79 73 74 65  xec\..file_Syste
0b40: 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e 4c 69  m.Data.SQLite.Li
0b50: 6e 71 2e 64 6c 6c 20 66 69 6c 65 5f 74 65 73 74  nq.dll file_test
0b60: 6c 69 6e 71 2e 65 78 65 20 66 69 6c 65 5f 6e 6f  linq.exe file_no
0b70: 72 74 68 77 69 6e 64 45 46 2e 64 62 7d 20 5c 0d  rthwindEF.db} \.
0b80: 0a 2d 72 65 73 75 6c 74 20 7b 30 20 3d 2d 3d 2d  .-result {0 =-=-
0b90: 3d 2d 3d 2d 2d 3d 2d 3d 2d 3d 2d 3d 7d 7d 0d 0a  =-=--=-=-=-=}}..
0ba0: 0d 0a 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ..##############
0bb0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0bc0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0bd0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0be0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0bf0: 23 0d 0a 0d 0a 72 75 6e 54 65 73 74 20 7b 74 65  #....runTest {te
0c00: 73 74 20 74 6b 74 2d 38 64 39 32 38 63 33 65 38  st tkt-8d928c3e8
0c10: 38 2d 32 2e 31 20 7b 4c 49 4e 51 20 77 2f 44 61  8-2.1 {LINQ w/Da
0c20: 74 65 54 69 6d 65 46 6f 72 6d 61 74 3d 54 69 63  teTimeFormat=Tic
0c30: 6b 73 7d 20 2d 62 6f 64 79 20 7b 0d 0a 20 20 23  ks} -body {..  #
0c40: 0d 0a 20 20 23 20 4e 4f 54 45 3a 20 52 65 2d 63  ..  # NOTE: Re-c
0c50: 6f 70 79 20 74 68 65 20 72 65 66 65 72 65 6e 63  opy the referenc
0c60: 65 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 20  e database file 
0c70: 75 73 65 64 20 66 6f 72 20 74 68 69 73 20 75 6e  used for this un
0c80: 69 74 20 74 65 73 74 20 74 6f 20 74 68 65 0d 0a  it test to the..
0c90: 20 20 23 20 20 20 20 20 20 20 62 75 69 6c 64 20    #       build 
0ca0: 64 69 72 65 63 74 6f 72 79 20 69 6e 20 63 61 73  directory in cas
0cb0: 65 20 69 74 20 68 61 73 20 62 65 65 6e 20 63 68  e it has been ch
0cc0: 61 6e 67 65 64 20 62 79 20 61 20 70 72 65 76 69  anged by a previ
0cd0: 6f 75 73 20 74 65 73 74 20 72 75 6e 2e 0d 0a 20  ous test run... 
0ce0: 20 23 0d 0a 20 20 66 69 6c 65 20 63 6f 70 79 20   #..  file copy 
0cf0: 2d 66 6f 72 63 65 20 24 6e 6f 72 74 68 77 69 6e  -force $northwin
0d00: 64 45 66 44 62 46 69 6c 65 20 5c 0d 0a 20 20 20  dEfDbFile \..   
0d10: 20 20 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b 67     [file join [g
0d20: 65 74 42 75 69 6c 64 44 69 72 65 63 74 6f 72 79  etBuildDirectory
0d30: 5d 20 5b 66 69 6c 65 20 74 61 69 6c 20 24 6e 6f  ] [file tail $no
0d40: 72 74 68 77 69 6e 64 45 66 44 62 46 69 6c 65 5d  rthwindEfDbFile]
0d50: 5d 0d 0a 0d 0a 20 20 73 65 74 20 72 65 73 75 6c  ]....  set resul
0d60: 74 20 5b 6c 69 73 74 5d 0d 0a 20 20 73 65 74 20  t [list]..  set 
0d70: 6f 75 74 70 75 74 20 22 22 0d 0a 0d 0a 20 20 73  output ""....  s
0d80: 65 74 20 63 6f 64 65 20 5b 63 61 74 63 68 20 7b  et code [catch {
0d90: 0d 0a 20 20 20 20 74 65 73 74 43 6c 72 45 78 65  ..    testClrExe
0da0: 63 20 24 74 65 73 74 4c 69 6e 71 45 78 65 46 69  c $testLinqExeFi
0db0: 6c 65 20 5b 6c 69 73 74 20 2d 65 76 65 6e 74 66  le [list -eventf
0dc0: 6c 61 67 73 20 57 61 69 74 20 2d 64 69 72 65 63  lags Wait -direc
0dd0: 74 6f 72 79 20 5c 0d 0a 20 20 20 20 20 20 20 20  tory \..        
0de0: 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 24 74  [file dirname $t
0df0: 65 73 74 4c 69 6e 71 45 78 65 46 69 6c 65 5d 20  estLinqExeFile] 
0e00: 2d 6e 6f 63 61 72 72 69 61 67 65 72 65 74 75 72  -nocarriageretur
0e10: 6e 73 20 2d 73 74 64 6f 75 74 20 6f 75 74 70 75  ns -stdout outpu
0e20: 74 20 5c 0d 0a 20 20 20 20 20 20 20 20 2d 73 75  t \..        -su
0e30: 63 63 65 73 73 20 30 5d 20 2d 64 61 74 65 74 69  ccess 0] -dateti
0e40: 6d 65 32 20 54 69 63 6b 73 0d 0a 20 20 7d 20 65  me2 Ticks..  } e
0e50: 72 72 6f 72 5d 0d 0a 0d 0a 20 20 74 6c 6f 67 20  rror]....  tlog 
0e60: 22 2d 2d 2d 2d 20 42 45 47 49 4e 20 53 54 44 4f  "---- BEGIN STDO
0e70: 55 54 20 4f 55 54 50 55 54 5c 6e 22 0d 0a 20 20  UT OUTPUT\n"..  
0e80: 74 6c 6f 67 20 24 6f 75 74 70 75 74 0d 0a 20 20  tlog $output..  
0e90: 74 6c 6f 67 20 22 5c 6e 2d 2d 2d 2d 20 45 4e 44  tlog "\n---- END
0ea0: 20 53 54 44 4f 55 54 20 4f 55 54 50 55 54 5c 6e   STDOUT OUTPUT\n
0eb0: 22 0d 0a 0d 0a 20 20 6c 61 70 70 65 6e 64 20 72  "....  lappend r
0ec0: 65 73 75 6c 74 20 24 63 6f 64 65 0d 0a 0d 0a 20  esult $code.... 
0ed0: 20 69 66 20 7b 24 63 6f 64 65 20 3d 3d 20 30 7d   if {$code == 0}
0ee0: 20 74 68 65 6e 20 7b 0d 0a 20 20 20 20 6c 61 70   then {..    lap
0ef0: 70 65 6e 64 20 72 65 73 75 6c 74 20 5b 73 74 72  pend result [str
0f00: 69 6e 67 20 74 72 69 6d 20 24 6f 75 74 70 75 74  ing trim $output
0f10: 5d 0d 0a 20 20 7d 20 65 6c 73 65 20 7b 0d 0a 20  ]..  } else {.. 
0f20: 20 20 20 6c 61 70 70 65 6e 64 20 72 65 73 75 6c     lappend resul
0f30: 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 24  t [string trim $
0f40: 65 72 72 6f 72 5d 0d 0a 20 20 7d 0d 0a 0d 0a 20  error]..  }.... 
0f50: 20 73 65 74 20 72 65 73 75 6c 74 0d 0a 7d 20 2d   set result..} -
0f60: 63 6c 65 61 6e 75 70 20 7b 0d 0a 20 20 75 6e 73  cleanup {..  uns
0f70: 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20 63  et -nocomplain c
0f80: 6f 64 65 20 6f 75 74 70 75 74 20 65 72 72 6f 72  ode output error
0f90: 20 72 65 73 75 6c 74 0d 0a 7d 20 2d 63 6f 6e 73   result..} -cons
0fa0: 74 72 61 69 6e 74 73 20 7b 65 61 67 6c 65 20 6d  traints {eagle m
0fb0: 6f 6e 6f 54 6f 44 6f 20 53 51 4c 69 74 65 20 66  onoToDo SQLite f
0fc0: 69 6c 65 5f 53 79 73 74 65 6d 2e 44 61 74 61 2e  ile_System.Data.
0fd0: 53 51 4c 69 74 65 2e 64 6c 6c 20 74 65 73 74 45  SQLite.dll testE
0fe0: 78 65 63 5c 0d 0a 66 69 6c 65 5f 53 79 73 74 65  xec\..file_Syste
0ff0: 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e 4c 69  m.Data.SQLite.Li
1000: 6e 71 2e 64 6c 6c 20 66 69 6c 65 5f 74 65 73 74  nq.dll file_test
1010: 6c 69 6e 71 2e 65 78 65 20 66 69 6c 65 5f 6e 6f  linq.exe file_no
1020: 72 74 68 77 69 6e 64 45 46 2e 64 62 7d 20 5c 0d  rthwindEF.db} \.
1030: 0a 2d 6d 61 74 63 68 20 72 65 67 65 78 70 20 2d  .-match regexp -
1040: 72 65 73 75 6c 74 20 5c 0d 0a 7b 5c 73 57 48 45  result \..{\sWHE
1050: 52 45 20 5c 5b 45 78 74 65 6e 74 31 5c 5d 5c 2e  RE \[Extent1\]\.
1060: 5c 5b 4f 72 64 65 72 44 61 74 65 5c 5d 20 3c 20  \[OrderDate\] < 
1070: 36 32 39 38 37 36 37 33 36 30 30 30 30 30 30 30  6298767360000000
1080: 30 30 5c 73 7d 7d 0d 0a 0d 0a 23 23 23 23 23 23  00\s}}....######
1090: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
10a0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
10b0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
10c0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
10d0: 23 23 23 23 23 23 23 23 23 0d 0a 0d 0a 72 75 6e  #########....run
10e0: 54 65 73 74 20 7b 74 65 73 74 20 74 6b 74 2d 38  Test {test tkt-8
10f0: 64 39 32 38 63 33 65 38 38 2d 32 2e 32 20 7b 4c  d928c3e88-2.2 {L
1100: 49 4e 51 20 77 2f 44 61 74 65 54 69 6d 65 46 6f  INQ w/DateTimeFo
1110: 72 6d 61 74 3d 4a 75 6c 69 61 6e 44 61 79 7d 20  rmat=JulianDay} 
1120: 2d 62 6f 64 79 20 7b 0d 0a 20 20 23 0d 0a 20 20  -body {..  #..  
1130: 23 20 4e 4f 54 45 3a 20 52 65 2d 63 6f 70 79 20  # NOTE: Re-copy 
1140: 74 68 65 20 72 65 66 65 72 65 6e 63 65 20 64 61  the reference da
1150: 74 61 62 61 73 65 20 66 69 6c 65 20 75 73 65 64  tabase file used
1160: 20 66 6f 72 20 74 68 69 73 20 75 6e 69 74 20 74   for this unit t
1170: 65 73 74 20 74 6f 20 74 68 65 0d 0a 20 20 23 20  est to the..  # 
1180: 20 20 20 20 20 20 62 75 69 6c 64 20 64 69 72 65        build dire
1190: 63 74 6f 72 79 20 69 6e 20 63 61 73 65 20 69 74  ctory in case it
11a0: 20 68 61 73 20 62 65 65 6e 20 63 68 61 6e 67 65   has been change
11b0: 64 20 62 79 20 61 20 70 72 65 76 69 6f 75 73 20  d by a previous 
11c0: 74 65 73 74 20 72 75 6e 2e 0d 0a 20 20 23 0d 0a  test run...  #..
11d0: 20 20 66 69 6c 65 20 63 6f 70 79 20 2d 66 6f 72    file copy -for
11e0: 63 65 20 24 6e 6f 72 74 68 77 69 6e 64 45 66 44  ce $northwindEfD
11f0: 62 46 69 6c 65 20 5c 0d 0a 20 20 20 20 20 20 5b  bFile \..      [
1200: 66 69 6c 65 20 6a 6f 69 6e 20 5b 67 65 74 42 75  file join [getBu
1210: 69 6c 64 44 69 72 65 63 74 6f 72 79 5d 20 5b 66  ildDirectory] [f
1220: 69 6c 65 20 74 61 69 6c 20 24 6e 6f 72 74 68 77  ile tail $northw
1230: 69 6e 64 45 66 44 62 46 69 6c 65 5d 5d 0d 0a 0d  indEfDbFile]]...
1240: 0a 20 20 73 65 74 20 72 65 73 75 6c 74 20 5b 6c  .  set result [l
1250: 69 73 74 5d 0d 0a 20 20 73 65 74 20 6f 75 74 70  ist]..  set outp
1260: 75 74 20 22 22 0d 0a 0d 0a 20 20 73 65 74 20 63  ut ""....  set c
1270: 6f 64 65 20 5b 63 61 74 63 68 20 7b 0d 0a 20 20  ode [catch {..  
1280: 20 20 74 65 73 74 43 6c 72 45 78 65 63 20 24 74    testClrExec $t
1290: 65 73 74 4c 69 6e 71 45 78 65 46 69 6c 65 20 5b  estLinqExeFile [
12a0: 6c 69 73 74 20 2d 65 76 65 6e 74 66 6c 61 67 73  list -eventflags
12b0: 20 57 61 69 74 20 2d 64 69 72 65 63 74 6f 72 79   Wait -directory
12c0: 20 5c 0d 0a 20 20 20 20 20 20 20 20 5b 66 69 6c   \..        [fil
12d0: 65 20 64 69 72 6e 61 6d 65 20 24 74 65 73 74 4c  e dirname $testL
12e0: 69 6e 71 45 78 65 46 69 6c 65 5d 20 2d 6e 6f 63  inqExeFile] -noc
12f0: 61 72 72 69 61 67 65 72 65 74 75 72 6e 73 20 2d  arriagereturns -
1300: 73 74 64 6f 75 74 20 6f 75 74 70 75 74 20 5c 0d  stdout output \.
1310: 0a 20 20 20 20 20 20 20 20 2d 73 75 63 63 65 73  .        -succes
1320: 73 20 30 5d 20 2d 64 61 74 65 74 69 6d 65 32 20  s 0] -datetime2 
1330: 4a 75 6c 69 61 6e 44 61 79 0d 0a 20 20 7d 20 65  JulianDay..  } e
1340: 72 72 6f 72 5d 0d 0a 0d 0a 20 20 74 6c 6f 67 20  rror]....  tlog 
1350: 22 2d 2d 2d 2d 20 42 45 47 49 4e 20 53 54 44 4f  "---- BEGIN STDO
1360: 55 54 20 4f 55 54 50 55 54 5c 6e 22 0d 0a 20 20  UT OUTPUT\n"..  
1370: 74 6c 6f 67 20 24 6f 75 74 70 75 74 0d 0a 20 20  tlog $output..  
1380: 74 6c 6f 67 20 22 5c 6e 2d 2d 2d 2d 20 45 4e 44  tlog "\n---- END
1390: 20 53 54 44 4f 55 54 20 4f 55 54 50 55 54 5c 6e   STDOUT OUTPUT\n
13a0: 22 0d 0a 0d 0a 20 20 6c 61 70 70 65 6e 64 20 72  "....  lappend r
13b0: 65 73 75 6c 74 20 24 63 6f 64 65 0d 0a 0d 0a 20  esult $code.... 
13c0: 20 69 66 20 7b 24 63 6f 64 65 20 3d 3d 20 30 7d   if {$code == 0}
13d0: 20 74 68 65 6e 20 7b 0d 0a 20 20 20 20 6c 61 70   then {..    lap
13e0: 70 65 6e 64 20 72 65 73 75 6c 74 20 5b 73 74 72  pend result [str
13f0: 69 6e 67 20 74 72 69 6d 20 24 6f 75 74 70 75 74  ing trim $output
1400: 5d 0d 0a 20 20 7d 20 65 6c 73 65 20 7b 0d 0a 20  ]..  } else {.. 
1410: 20 20 20 6c 61 70 70 65 6e 64 20 72 65 73 75 6c     lappend resul
1420: 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 24  t [string trim $
1430: 65 72 72 6f 72 5d 0d 0a 20 20 7d 0d 0a 0d 0a 20  error]..  }.... 
1440: 20 73 65 74 20 72 65 73 75 6c 74 0d 0a 7d 20 2d   set result..} -
1450: 63 6c 65 61 6e 75 70 20 7b 0d 0a 20 20 75 6e 73  cleanup {..  uns
1460: 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20 63  et -nocomplain c
1470: 6f 64 65 20 6f 75 74 70 75 74 20 65 72 72 6f 72  ode output error
1480: 20 72 65 73 75 6c 74 0d 0a 7d 20 2d 63 6f 6e 73   result..} -cons
1490: 74 72 61 69 6e 74 73 20 7b 65 61 67 6c 65 20 6d  traints {eagle m
14a0: 6f 6e 6f 54 6f 44 6f 20 53 51 4c 69 74 65 20 66  onoToDo SQLite f
14b0: 69 6c 65 5f 53 79 73 74 65 6d 2e 44 61 74 61 2e  ile_System.Data.
14c0: 53 51 4c 69 74 65 2e 64 6c 6c 20 74 65 73 74 45  SQLite.dll testE
14d0: 78 65 63 5c 0d 0a 66 69 6c 65 5f 53 79 73 74 65  xec\..file_Syste
14e0: 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e 4c 69  m.Data.SQLite.Li
14f0: 6e 71 2e 64 6c 6c 20 66 69 6c 65 5f 74 65 73 74  nq.dll file_test
1500: 6c 69 6e 71 2e 65 78 65 20 66 69 6c 65 5f 6e 6f  linq.exe file_no
1510: 72 74 68 77 69 6e 64 45 46 2e 64 62 7d 20 5c 0d  rthwindEF.db} \.
1520: 0a 2d 6d 61 74 63 68 20 72 65 67 65 78 70 20 2d  .-match regexp -
1530: 72 65 73 75 6c 74 20 7b 5c 73 57 48 45 52 45 20  result {\sWHERE 
1540: 5c 5b 45 78 74 65 6e 74 31 5c 5d 5c 2e 5c 5b 4f  \[Extent1\]\.\[O
1550: 72 64 65 72 44 61 74 65 5c 5d 20 3c 20 32 34 35  rderDate\] < 245
1560: 30 34 34 39 5c 2e 35 5c 73 7d 7d 0d 0a 0d 0a 23  0449\.5\s}}....#
1570: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1580: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1590: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
15a0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
15b0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 0d 0a  ##############..
15c0: 0d 0a 72 75 6e 54 65 73 74 20 7b 74 65 73 74 20  ..runTest {test 
15d0: 74 6b 74 2d 38 64 39 32 38 63 33 65 38 38 2d 32  tkt-8d928c3e88-2
15e0: 2e 33 20 7b 4c 49 4e 51 20 77 2f 44 61 74 65 54  .3 {LINQ w/DateT
15f0: 69 6d 65 46 6f 72 6d 61 74 3d 55 6e 69 78 45 70  imeFormat=UnixEp
1600: 6f 63 68 7d 20 2d 62 6f 64 79 20 7b 0d 0a 20 20  och} -body {..  
1610: 23 0d 0a 20 20 23 20 4e 4f 54 45 3a 20 52 65 2d  #..  # NOTE: Re-
1620: 63 6f 70 79 20 74 68 65 20 72 65 66 65 72 65 6e  copy the referen
1630: 63 65 20 64 61 74 61 62 61 73 65 20 66 69 6c 65  ce database file
1640: 20 75 73 65 64 20 66 6f 72 20 74 68 69 73 20 75   used for this u
1650: 6e 69 74 20 74 65 73 74 20 74 6f 20 74 68 65 0d  nit test to the.
1660: 0a 20 20 23 20 20 20 20 20 20 20 62 75 69 6c 64  .  #       build
1670: 20 64 69 72 65 63 74 6f 72 79 20 69 6e 20 63 61   directory in ca
1680: 73 65 20 69 74 20 68 61 73 20 62 65 65 6e 20 63  se it has been c
1690: 68 61 6e 67 65 64 20 62 79 20 61 20 70 72 65 76  hanged by a prev
16a0: 69 6f 75 73 20 74 65 73 74 20 72 75 6e 2e 0d 0a  ious test run...
16b0: 20 20 23 0d 0a 20 20 66 69 6c 65 20 63 6f 70 79    #..  file copy
16c0: 20 2d 66 6f 72 63 65 20 24 6e 6f 72 74 68 77 69   -force $northwi
16d0: 6e 64 45 66 44 62 46 69 6c 65 20 5c 0d 0a 20 20  ndEfDbFile \..  
16e0: 20 20 20 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b      [file join [
16f0: 67 65 74 42 75 69 6c 64 44 69 72 65 63 74 6f 72  getBuildDirector
1700: 79 5d 20 5b 66 69 6c 65 20 74 61 69 6c 20 24 6e  y] [file tail $n
1710: 6f 72 74 68 77 69 6e 64 45 66 44 62 46 69 6c 65  orthwindEfDbFile
1720: 5d 5d 0d 0a 0d 0a 20 20 73 65 74 20 72 65 73 75  ]]....  set resu
1730: 6c 74 20 5b 6c 69 73 74 5d 0d 0a 20 20 73 65 74  lt [list]..  set
1740: 20 6f 75 74 70 75 74 20 22 22 0d 0a 0d 0a 20 20   output ""....  
1750: 73 65 74 20 63 6f 64 65 20 5b 63 61 74 63 68 20  set code [catch 
1760: 7b 0d 0a 20 20 20 20 74 65 73 74 43 6c 72 45 78  {..    testClrEx
1770: 65 63 20 24 74 65 73 74 4c 69 6e 71 45 78 65 46  ec $testLinqExeF
1780: 69 6c 65 20 5b 6c 69 73 74 20 2d 65 76 65 6e 74  ile [list -event
1790: 66 6c 61 67 73 20 57 61 69 74 20 2d 64 69 72 65  flags Wait -dire
17a0: 63 74 6f 72 79 20 5c 0d 0a 20 20 20 20 20 20 20  ctory \..       
17b0: 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 24   [file dirname $
17c0: 74 65 73 74 4c 69 6e 71 45 78 65 46 69 6c 65 5d  testLinqExeFile]
17d0: 20 2d 6e 6f 63 61 72 72 69 61 67 65 72 65 74 75   -nocarriageretu
17e0: 72 6e 73 20 2d 73 74 64 6f 75 74 20 6f 75 74 70  rns -stdout outp
17f0: 75 74 20 5c 0d 0a 20 20 20 20 20 20 20 20 2d 73  ut \..        -s
1800: 75 63 63 65 73 73 20 30 5d 20 2d 64 61 74 65 74  uccess 0] -datet
1810: 69 6d 65 32 20 55 6e 69 78 45 70 6f 63 68 0d 0a  ime2 UnixEpoch..
1820: 20 20 7d 20 65 72 72 6f 72 5d 0d 0a 0d 0a 20 20    } error]....  
1830: 74 6c 6f 67 20 22 2d 2d 2d 2d 20 42 45 47 49 4e  tlog "---- BEGIN
1840: 20 53 54 44 4f 55 54 20 4f 55 54 50 55 54 5c 6e   STDOUT OUTPUT\n
1850: 22 0d 0a 20 20 74 6c 6f 67 20 24 6f 75 74 70 75  "..  tlog $outpu
1860: 74 0d 0a 20 20 74 6c 6f 67 20 22 5c 6e 2d 2d 2d  t..  tlog "\n---
1870: 2d 20 45 4e 44 20 53 54 44 4f 55 54 20 4f 55 54  - END STDOUT OUT
1880: 50 55 54 5c 6e 22 0d 0a 0d 0a 20 20 6c 61 70 70  PUT\n"....  lapp
1890: 65 6e 64 20 72 65 73 75 6c 74 20 24 63 6f 64 65  end result $code
18a0: 0d 0a 0d 0a 20 20 69 66 20 7b 24 63 6f 64 65 20  ....  if {$code 
18b0: 3d 3d 20 30 7d 20 74 68 65 6e 20 7b 0d 0a 20 20  == 0} then {..  
18c0: 20 20 6c 61 70 70 65 6e 64 20 72 65 73 75 6c 74    lappend result
18d0: 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 24 6f   [string trim $o
18e0: 75 74 70 75 74 5d 0d 0a 20 20 7d 20 65 6c 73 65  utput]..  } else
18f0: 20 7b 0d 0a 20 20 20 20 6c 61 70 70 65 6e 64 20   {..    lappend 
1900: 72 65 73 75 6c 74 20 5b 73 74 72 69 6e 67 20 74  result [string t
1910: 72 69 6d 20 24 65 72 72 6f 72 5d 0d 0a 20 20 7d  rim $error]..  }
1920: 0d 0a 0d 0a 20 20 73 65 74 20 72 65 73 75 6c 74  ....  set result
1930: 0d 0a 7d 20 2d 63 6c 65 61 6e 75 70 20 7b 0d 0a  ..} -cleanup {..
1940: 20 20 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c    unset -nocompl
1950: 61 69 6e 20 63 6f 64 65 20 6f 75 74 70 75 74 20  ain code output 
1960: 65 72 72 6f 72 20 72 65 73 75 6c 74 0d 0a 7d 20  error result..} 
1970: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 65 61  -constraints {ea
1980: 67 6c 65 20 6d 6f 6e 6f 54 6f 44 6f 20 53 51 4c  gle monoToDo SQL
1990: 69 74 65 20 66 69 6c 65 5f 53 79 73 74 65 6d 2e  ite file_System.
19a0: 44 61 74 61 2e 53 51 4c 69 74 65 2e 64 6c 6c 20  Data.SQLite.dll 
19b0: 74 65 73 74 45 78 65 63 5c 0d 0a 66 69 6c 65 5f  testExec\..file_
19c0: 53 79 73 74 65 6d 2e 44 61 74 61 2e 53 51 4c 69  System.Data.SQLi
19d0: 74 65 2e 4c 69 6e 71 2e 64 6c 6c 20 66 69 6c 65  te.Linq.dll file
19e0: 5f 74 65 73 74 6c 69 6e 71 2e 65 78 65 20 66 69  _testlinq.exe fi
19f0: 6c 65 5f 6e 6f 72 74 68 77 69 6e 64 45 46 2e 64  le_northwindEF.d
1a00: 62 7d 20 5c 0d 0a 2d 6d 61 74 63 68 20 72 65 67  b} \..-match reg
1a10: 65 78 70 20 2d 72 65 73 75 6c 74 20 7b 5c 73 57  exp -result {\sW
1a20: 48 45 52 45 20 5c 5b 45 78 74 65 6e 74 31 5c 5d  HERE \[Extent1\]
1a30: 5c 2e 5c 5b 4f 72 64 65 72 44 61 74 65 5c 5d 20  \.\[OrderDate\] 
1a40: 3c 20 38 35 32 30 37 36 38 30 30 5c 73 7d 7d 0d  < 852076800\s}}.
1a50: 0a 0d 0a 23 23 23 23 23 23 23 23 23 23 23 23 23  ...#############
1a60: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1a70: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1a80: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1a90: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1aa0: 23 23 0d 0a 0d 0a 72 75 6e 54 65 73 74 20 7b 74  ##....runTest {t
1ab0: 65 73 74 20 74 6b 74 2d 38 64 39 32 38 63 33 65  est tkt-8d928c3e
1ac0: 38 38 2d 32 2e 34 20 7b 4c 49 4e 51 20 77 2f 44  88-2.4 {LINQ w/D
1ad0: 61 74 65 54 69 6d 65 46 6f 72 6d 61 74 3d 49 53  ateTimeFormat=IS
1ae0: 4f 38 36 30 31 7d 20 2d 62 6f 64 79 20 7b 0d 0a  O8601} -body {..
1af0: 20 20 23 0d 0a 20 20 23 20 4e 4f 54 45 3a 20 52    #..  # NOTE: R
1b00: 65 2d 63 6f 70 79 20 74 68 65 20 72 65 66 65 72  e-copy the refer
1b10: 65 6e 63 65 20 64 61 74 61 62 61 73 65 20 66 69  ence database fi
1b20: 6c 65 20 75 73 65 64 20 66 6f 72 20 74 68 69 73  le used for this
1b30: 20 75 6e 69 74 20 74 65 73 74 20 74 6f 20 74 68   unit test to th
1b40: 65 0d 0a 20 20 23 20 20 20 20 20 20 20 62 75 69  e..  #       bui
1b50: 6c 64 20 64 69 72 65 63 74 6f 72 79 20 69 6e 20  ld directory in 
1b60: 63 61 73 65 20 69 74 20 68 61 73 20 62 65 65 6e  case it has been
1b70: 20 63 68 61 6e 67 65 64 20 62 79 20 61 20 70 72   changed by a pr
1b80: 65 76 69 6f 75 73 20 74 65 73 74 20 72 75 6e 2e  evious test run.
1b90: 0d 0a 20 20 23 0d 0a 20 20 66 69 6c 65 20 63 6f  ..  #..  file co
1ba0: 70 79 20 2d 66 6f 72 63 65 20 24 6e 6f 72 74 68  py -force $north
1bb0: 77 69 6e 64 45 66 44 62 46 69 6c 65 20 5c 0d 0a  windEfDbFile \..
1bc0: 20 20 20 20 20 20 5b 66 69 6c 65 20 6a 6f 69 6e        [file join
1bd0: 20 5b 67 65 74 42 75 69 6c 64 44 69 72 65 63 74   [getBuildDirect
1be0: 6f 72 79 5d 20 5b 66 69 6c 65 20 74 61 69 6c 20  ory] [file tail 
1bf0: 24 6e 6f 72 74 68 77 69 6e 64 45 66 44 62 46 69  $northwindEfDbFi
1c00: 6c 65 5d 5d 0d 0a 0d 0a 20 20 73 65 74 20 72 65  le]]....  set re
1c10: 73 75 6c 74 20 5b 6c 69 73 74 5d 0d 0a 20 20 73  sult [list]..  s
1c20: 65 74 20 6f 75 74 70 75 74 20 22 22 0d 0a 0d 0a  et output ""....
1c30: 20 20 73 65 74 20 63 6f 64 65 20 5b 63 61 74 63    set code [catc
1c40: 68 20 7b 0d 0a 20 20 20 20 74 65 73 74 43 6c 72  h {..    testClr
1c50: 45 78 65 63 20 24 74 65 73 74 4c 69 6e 71 45 78  Exec $testLinqEx
1c60: 65 46 69 6c 65 20 5b 6c 69 73 74 20 2d 65 76 65  eFile [list -eve
1c70: 6e 74 66 6c 61 67 73 20 57 61 69 74 20 2d 64 69  ntflags Wait -di
1c80: 72 65 63 74 6f 72 79 20 5c 0d 0a 20 20 20 20 20  rectory \..     
1c90: 20 20 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65     [file dirname
1ca0: 20 24 74 65 73 74 4c 69 6e 71 45 78 65 46 69 6c   $testLinqExeFil
1cb0: 65 5d 20 2d 6e 6f 63 61 72 72 69 61 67 65 72 65  e] -nocarriagere
1cc0: 74 75 72 6e 73 20 2d 73 74 64 6f 75 74 20 6f 75  turns -stdout ou
1cd0: 74 70 75 74 20 5c 0d 0a 20 20 20 20 20 20 20 20  tput \..        
1ce0: 2d 73 75 63 63 65 73 73 20 30 5d 20 2d 64 61 74  -success 0] -dat
1cf0: 65 74 69 6d 65 32 20 49 53 4f 38 36 30 31 0d 0a  etime2 ISO8601..
1d00: 20 20 7d 20 65 72 72 6f 72 5d 0d 0a 0d 0a 20 20    } error]....  
1d10: 74 6c 6f 67 20 22 2d 2d 2d 2d 20 42 45 47 49 4e  tlog "---- BEGIN
1d20: 20 53 54 44 4f 55 54 20 4f 55 54 50 55 54 5c 6e   STDOUT OUTPUT\n
1d30: 22 0d 0a 20 20 74 6c 6f 67 20 24 6f 75 74 70 75  "..  tlog $outpu
1d40: 74 0d 0a 20 20 74 6c 6f 67 20 22 5c 6e 2d 2d 2d  t..  tlog "\n---
1d50: 2d 20 45 4e 44 20 53 54 44 4f 55 54 20 4f 55 54  - END STDOUT OUT
1d60: 50 55 54 5c 6e 22 0d 0a 0d 0a 20 20 6c 61 70 70  PUT\n"....  lapp
1d70: 65 6e 64 20 72 65 73 75 6c 74 20 24 63 6f 64 65  end result $code
1d80: 0d 0a 0d 0a 20 20 69 66 20 7b 24 63 6f 64 65 20  ....  if {$code 
1d90: 3d 3d 20 30 7d 20 74 68 65 6e 20 7b 0d 0a 20 20  == 0} then {..  
1da0: 20 20 6c 61 70 70 65 6e 64 20 72 65 73 75 6c 74    lappend result
1db0: 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 24 6f   [string trim $o
1dc0: 75 74 70 75 74 5d 0d 0a 20 20 7d 20 65 6c 73 65  utput]..  } else
1dd0: 20 7b 0d 0a 20 20 20 20 6c 61 70 70 65 6e 64 20   {..    lappend 
1de0: 72 65 73 75 6c 74 20 5b 73 74 72 69 6e 67 20 74  result [string t
1df0: 72 69 6d 20 24 65 72 72 6f 72 5d 0d 0a 20 20 7d  rim $error]..  }
1e00: 0d 0a 0d 0a 20 20 73 65 74 20 72 65 73 75 6c 74  ....  set result
1e10: 0d 0a 7d 20 2d 63 6c 65 61 6e 75 70 20 7b 0d 0a  ..} -cleanup {..
1e20: 20 20 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c    unset -nocompl
1e30: 61 69 6e 20 63 6f 64 65 20 6f 75 74 70 75 74 20  ain code output 
1e40: 65 72 72 6f 72 20 72 65 73 75 6c 74 0d 0a 7d 20  error result..} 
1e50: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 65 61  -constraints {ea
1e60: 67 6c 65 20 6d 6f 6e 6f 54 6f 44 6f 20 53 51 4c  gle monoToDo SQL
1e70: 69 74 65 20 66 69 6c 65 5f 53 79 73 74 65 6d 2e  ite file_System.
1e80: 44 61 74 61 2e 53 51 4c 69 74 65 2e 64 6c 6c 20  Data.SQLite.dll 
1e90: 74 65 73 74 45 78 65 63 5c 0d 0a 66 69 6c 65 5f  testExec\..file_
1ea0: 53 79 73 74 65 6d 2e 44 61 74 61 2e 53 51 4c 69  System.Data.SQLi
1eb0: 74 65 2e 4c 69 6e 71 2e 64 6c 6c 20 66 69 6c 65  te.Linq.dll file
1ec0: 5f 74 65 73 74 6c 69 6e 71 2e 65 78 65 20 66 69  _testlinq.exe fi
1ed0: 6c 65 5f 6e 6f 72 74 68 77 69 6e 64 45 46 2e 64  le_northwindEF.d
1ee0: 62 7d 20 5c 0d 0a 2d 6d 61 74 63 68 20 72 65 67  b} \..-match reg
1ef0: 65 78 70 20 2d 72 65 73 75 6c 74 20 5c 0d 0a 7b  exp -result \..{
1f00: 5c 73 57 48 45 52 45 20 5c 5b 45 78 74 65 6e 74  \sWHERE \[Extent
1f10: 31 5c 5d 5c 2e 5c 5b 4f 72 64 65 72 44 61 74 65  1\]\.\[OrderDate
1f20: 5c 5d 20 3c 20 27 31 39 39 37 2d 30 31 2d 30 31  \] < '1997-01-01
1f30: 20 30 30 3a 30 30 3a 30 30 27 5c 73 7d 7d 0d 0a   00:00:00'\s}}..
1f40: 0d 0a 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ..##############
1f50: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1f60: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1f70: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1f80: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1f90: 23 0d 0a 0d 0a 72 75 6e 53 51 4c 69 74 65 54 65  #....runSQLiteTe
1fa0: 73 74 46 69 6c 65 73 45 70 69 6c 6f 67 75 65 0d  stFilesEpilogue.
1fb0: 0a 72 75 6e 53 51 4c 69 74 65 54 65 73 74 45 70  .runSQLiteTestEp
1fc0: 69 6c 6f 67 75 65 0d 0a 72 75 6e 54 65 73 74 45  ilogue..runTestE
1fd0: 70 69 6c 6f 67 75 65 0d 0a                       pilogue..