OLD | NEW |
1 # 2007 May 04 | 1 # 2007 May 04 |
2 # | 2 # |
3 # The author disclaims copyright to this source code. In place of | 3 # The author disclaims copyright to this source code. In place of |
4 # a legal notice, here is a blessing: | 4 # a legal notice, here is a blessing: |
5 # | 5 # |
6 # May you do good and not evil. | 6 # May you do good and not evil. |
7 # May you find forgiveness for yourself and forgive others. | 7 # May you find forgiveness for yourself and forgive others. |
8 # May you share freely, never taking more than you give. | 8 # May you share freely, never taking more than you give. |
9 # | 9 # |
10 #*********************************************************************** | 10 #*********************************************************************** |
(...skipping 116 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
127 execsql { | 127 execsql { |
128 BEGIN; | 128 BEGIN; |
129 DELETE FROM abc; | 129 DELETE FROM abc; |
130 PRAGMA incremental_vacuum; | 130 PRAGMA incremental_vacuum; |
131 COMMIT; | 131 COMMIT; |
132 } | 132 } |
133 } {} | 133 } {} |
134 | 134 |
135 integrity_check incrvacuum2-3.3 | 135 integrity_check incrvacuum2-3.3 |
136 | 136 |
137 ifcapable wal { | 137 if {[wal_is_capable]} { |
138 # At one point, when a specific page was being extracted from the b-tree | 138 # At one point, when a specific page was being extracted from the b-tree |
139 # free-list (e.g. during an incremental-vacuum), all trunk pages that | 139 # free-list (e.g. during an incremental-vacuum), all trunk pages that |
140 # occurred before the specific page in the free-list trunk were being | 140 # occurred before the specific page in the free-list trunk were being |
141 # written to the journal or wal file. This is not necessary. Only the | 141 # written to the journal or wal file. This is not necessary. Only the |
142 # extracted page and the page that contains the pointer to it need to | 142 # extracted page and the page that contains the pointer to it need to |
143 # be journalled. | 143 # be journalled. |
144 # | 144 # |
145 # This problem was fixed by [d03d63d77e] (just before 3.7.6 release). | 145 # This problem was fixed by [d03d63d77e] (just before 3.7.6 release). |
146 # | 146 # |
147 # This test case builds a database containing many free pages. Then runs | 147 # This test case builds a database containing many free pages. Then runs |
(...skipping 56 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
204 execsql { PRAGMA wal_checkpoint } | 204 execsql { PRAGMA wal_checkpoint } |
205 execsql { PRAGMA incremental_vacuum(1) } | 205 execsql { PRAGMA incremental_vacuum(1) } |
206 set newsz [file size test.db-wal] | 206 set newsz [file size test.db-wal] |
207 if {$newsz>$maxsz} {set maxsz $newsz} | 207 if {$newsz>$maxsz} {set maxsz $newsz} |
208 } | 208 } |
209 set maxsz | 209 set maxsz |
210 } [expr {32+3*(512+24)}] | 210 } [expr {32+3*(512+24)}] |
211 } | 211 } |
212 | 212 |
213 finish_test | 213 finish_test |
OLD | NEW |