Import SQLite 3.10.2.

third_party/sqlite/src/test/uri.test

 # 2011 April 22
 #
 # The author disclaims copyright to this source code.  In place of
 # a legal notice, here is a blessing:
 #
 #    May you do good and not evil.
 #    May you find forgiveness for yourself and forgive others.
 #    May you share freely, never taking more than you give.
 #
 #***********************************************************************
@@ skipping 46 matching lines @@
 
   if {$tcl_platform(platform)=="windows"} {
     #
     # NOTE: Due to limits on legal characters for file names imposed by
     #       Windows, we must skip the final two tests here (i.e. the
     #       question mark is illegal in a file name on Windows).
     #
     if {$tn>14} break
 
     #
+    # NOTE: When running on Tcl 8.6 (or higher?) on Windows, a colon within
+    #       the file name no longer tries to access an alternate data stream
+    #       (ADS) named "test.db" for the "http" file, causing some spurious
+    #       failures of this test.
+    #
+    if {$tn==12 && $::tcl_version>=8.6} continue
+
+    #
     # NOTE: On Windows, we need to account for the fact that the current
     #       directory does not start with a forward slash.
     #
     set uri  [string map [list PWD/ /[test_pwd /]] $uri]
   } else {
     set uri  [string map [list PWD/ [test_pwd /]] $uri]
   }
 
   if {[file isdir $file]} {error "$file is a directory"}
   forcedelete $file
@@ skipping 241 matching lines @@
   execsql { ATTACH 'file:test.db2?mode=rw' AS aux }
 } {}
 do_execsql_test  7.3 { 
   INSERT INTO t2 VALUES('c', 'd') 
 } {}
 do_catchsql_test 7.4 { 
   INSERT INTO t1 VALUES(3, 4) 
 } {1 {attempt to write a readonly database}}
 
 finish_test