SQLite

Check-in [13b4975681]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Remove debugging puts from concurrrent3.test.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | begin-concurrent
Files: files | file ages | folders
SHA3-256: 13b4975681f249831a22562d1c26958f841ea77ca779858b0bee735dd30b710e
User & Date: drh 2018-03-20 13:54:22.689
Context
2018-04-24
19:21
Merge latest trunk changes into this branch. (check-in: b27bd799ea user: dan tags: begin-concurrent)
2018-03-20
14:00
Merge all recent trunk enchancements, and especially the autoincrement write reduction fix. (check-in: 257900494f user: drh tags: begin-concurrent-pnu)
13:54
Remove debugging puts from concurrrent3.test. (check-in: 13b4975681 user: drh tags: begin-concurrent)
13:52
Merge all recent enhancements from trunk. (check-in: b0c2f760a6 user: drh tags: begin-concurrent)
Changes
Unified Diff Ignore Whitespace Patch
Changes to test/concurrent3.test.
23
24
25
26
27
28
29
30



31
32
33
34
35
36
37
  finish_test
  return
}

db close
sqlite3_shutdown
test_sqlite3_log xLog
proc xLog {error_code msg} { puts "$error_code: $msg" }



reset_db

proc create_schema {} {
  db eval {
    PRAGMA journal_mode = wal;

    CREATE TABLE t1(x, y);







|
>
>
>







23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
  finish_test
  return
}

db close
sqlite3_shutdown
test_sqlite3_log xLog
proc xLog {error_code msg} {
  # puts "$error_code: $msg"
  # Enable the previous for debugging
}
reset_db

proc create_schema {} {
  db eval {
    PRAGMA journal_mode = wal;

    CREATE TABLE t1(x, y);
214
215
216
217
218
219
220
221
222
223

224
225
226
227
228
229
      if {$res != "ok"} { puts "after $db $rc: $res" ; after 1000000 }
    }
  } {}

  foreach db $DBLIST { 
    $db close 
  }
  foreach k [lsort [array names used]] {
    puts "$k: $stats($k,0) committed, $stats($k,1) rolled back"
  }

}



finish_test








|
|
<
>





<
217
218
219
220
221
222
223
224
225

226
227
228
229
230
231

      if {$res != "ok"} { puts "after $db $rc: $res" ; after 1000000 }
    }
  } {}

  foreach db $DBLIST { 
    $db close 
  }
  # foreach k [lsort [array names used]] {
  #   puts "$k: $stats($k,0) committed, $stats($k,1) rolled back"

  # }
}



finish_test