| 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 43 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 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 unlink openDirectory mkdir rmdir | 62 pread64 pwrite64 unlink openDirectory mkdir rmdir |
| 63 statvfs fchown geteuid umask mmap munmap mremap | 63 statvfs fchown geteuid umask mmap munmap mremap |
| 64 getpagesize readlink | 64 getpagesize readlink lstat |
| 65 } { | 65 } { |
| 66 if {[test_syscall exists $s]} {lappend syscall_list $s} | 66 if {[test_syscall exists $s]} {lappend syscall_list $s} |
| 67 } | 67 } |
| 68 do_test 3.1 { lsort [test_syscall list] } [lsort $syscall_list] | 68 do_test 3.1 { lsort [test_syscall list] } [lsort $syscall_list] |
| 69 | 69 |
| 70 #------------------------------------------------------------------------- | 70 #------------------------------------------------------------------------- |
| 71 # This test verifies that if a call to open() fails and errno is set to | 71 # This test verifies that if a call to open() fails and errno is set to |
| 72 # EINTR, the call is retried. If it succeeds, execution continues as if | 72 # EINTR, the call is retried. If it succeeds, execution continues as if |
| 73 # nothing happened. | 73 # nothing happened. |
| 74 # | 74 # |
| (...skipping 194 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 269 5 49 64 | 269 5 49 64 |
| 270 } { | 270 } { |
| 271 do_test 8.4.$tn { | 271 do_test 8.4.$tn { |
| 272 file_control_sizehint_test db main $hint | 272 file_control_sizehint_test db main $hint |
| 273 file size test.db | 273 file size test.db |
| 274 } $size | 274 } $size |
| 275 } | 275 } |
| 276 | 276 |
| 277 test_syscall reset | 277 test_syscall reset |
| 278 finish_test | 278 finish_test |
| OLD | NEW |