Import SQLite 3.8.7.4.

third_party/sqlite/src/test/rollback.test

 # 2004 June 30
 #
 # 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 36 matching lines @@
 } {SQLITE_ROW}
 
 ifcapable conflict {
   # This causes a ROLLBACK, which deletes the table out from underneath the
   # SELECT statement.
   #
   do_test rollback-1.4 {
     catchsql {
       INSERT INTO t3 SELECT a FROM t1;
     }
-  } {1 {column a is not unique}}
+  } {1 {UNIQUE constraint failed: t3.a}}
   
   # Try to continue with the SELECT statement
   #
   do_test rollback-1.5 {
     sqlite3_step $STMT
-  } {SQLITE_ERROR}
+  } {SQLITE_ROW}
 
   # Restart the SELECT statement
   #
-  do_test rollback-1.6 { sqlite3_reset $STMT } {SQLITE_ABORT}
+  do_test rollback-1.6 { sqlite3_reset $STMT } {SQLITE_OK}
 } else {
   do_test rollback-1.6 { sqlite3_reset $STMT } {SQLITE_OK}
 }
 
 do_test rollback-1.7 {
   sqlite3_step $STMT
 } {SQLITE_ROW}
 do_test rollback-1.8 {
   sqlite3_step $STMT
 } {SQLITE_ROW}
 do_test rollback-1.9 {
   sqlite3_finalize $STMT
 } {SQLITE_OK}
 
 if {$tcl_platform(platform) == "unix" 
  && [permutation] ne "onefile"
  && [permutation] ne "inmemory_journal"
 } {
   do_test rollback-2.1 {
     execsql {
       BEGIN;
       INSERT INTO t3 VALUES('hello world');
     }
-    file copy -force test.db testA.db
-    file copy -force test.db-journal testA.db-journal
+    forcecopy test.db testA.db
+    forcecopy test.db-journal testA.db-journal
     execsql {
       COMMIT;
     }
   } {}
 
   # At this point files testA.db and testA.db-journal are present in the
   # file system. This block adds a master-journal file pointer to the
   # end of testA.db-journal. The master-journal file does not exist.
   # 
   set mj [file normalize testA.db-mj-123]
@@ skipping 38 matching lines @@
   do_test rollback-2.4 {
     execsql {
       SELECT distinct tbl_name FROM sqlite_master;
     } db2
   } {t1 t3}
 
   db2 close
 }
 
 finish_test