| OLD | NEW |
| 1 # 2011 March 29 | 1 # 2011 March 29 |
| 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 41 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 52 # | 52 # |
| 53 do_test 2.1.1 { test_syscall exists open } 1 | 53 do_test 2.1.1 { test_syscall exists open } 1 |
| 54 do_test 2.1.2 { test_syscall exists nosuchcall } 0 | 54 do_test 2.1.2 { test_syscall exists nosuchcall } 0 |
| 55 | 55 |
| 56 #------------------------------------------------------------------------- | 56 #------------------------------------------------------------------------- |
| 57 # Tests for the xNextSystemCall method. | 57 # Tests for the xNextSystemCall method. |
| 58 # | 58 # |
| 59 foreach s { | 59 foreach s { |
| 60 open close access getcwd stat fstat ftruncate | 60 open close access getcwd stat fstat ftruncate |
| 61 fcntl read pread write pwrite fchmod fallocate | 61 fcntl read pread write pwrite fchmod fallocate |
| 62 pread64 pwrite64 | 62 pread64 pwrite64 unlink openDirectory |
| 63 } { | 63 } { |
| 64 if {[test_syscall exists $s]} {lappend syscall_list $s} | 64 if {[test_syscall exists $s]} {lappend syscall_list $s} |
| 65 } | 65 } |
| 66 do_test 3.1 { lsort [test_syscall list] } [lsort $syscall_list] | 66 do_test 3.1 { lsort [test_syscall list] } [lsort $syscall_list] |
| 67 | 67 |
| 68 #------------------------------------------------------------------------- | 68 #------------------------------------------------------------------------- |
| 69 # This test verifies that if a call to open() fails and errno is set to | 69 # This test verifies that if a call to open() fails and errno is set to |
| 70 # EINTR, the call is retried. If it succeeds, execution continues as if | 70 # EINTR, the call is retried. If it succeeds, execution continues as if |
| 71 # nothing happened. | 71 # nothing happened. |
| 72 # | 72 # |
| (...skipping 194 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 267 5 49 64 | 267 5 49 64 |
| 268 } { | 268 } { |
| 269 do_test 8.4.$tn { | 269 do_test 8.4.$tn { |
| 270 file_control_sizehint_test db main $hint | 270 file_control_sizehint_test db main $hint |
| 271 file size test.db | 271 file size test.db |
| 272 } $size | 272 } $size |
| 273 } | 273 } |
| 274 | 274 |
| 275 test_syscall reset | 275 test_syscall reset |
| 276 finish_test | 276 finish_test |
| OLD | NEW |