diff options
author | Steve Bennett <steveb@workware.net.au> | 2020-05-04 22:19:53 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2020-05-04 23:04:09 +1000 |
commit | 9366d8f76430fac4c64be6dd99e44a13ed4c2fb9 (patch) | |
tree | ea0af6f35b44e1b441c3b2de9f9cc286929cfb6c /tests/posix.test | |
parent | b58ccf39a730dba009abbbae19cb55e0200d37ac (diff) | |
download | jimtcl-9366d8f76430fac4c64be6dd99e44a13ed4c2fb9.zip jimtcl-9366d8f76430fac4c64be6dd99e44a13ed4c2fb9.tar.gz jimtcl-9366d8f76430fac4c64be6dd99e44a13ed4c2fb9.tar.bz2 |
tests: Fixes to recent tests for windows
Mostly just avoiding running certain tests, but also:
- rename() won't overwrite an existing file on Windows
- ensure that eof returns 0 or 1
- in aio.test, create and read the file in binary mode
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests/posix.test')
-rw-r--r-- | tests/posix.test | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/posix.test b/tests/posix.test index 74423cb..f34ced7 100644 --- a/tests/posix.test +++ b/tests/posix.test @@ -3,11 +3,11 @@ source [file dirname [info script]]/testing.tcl needs constraint jim testCmdConstraints os.getids os.gethostname os.uptime os.fork -test posix-1.1 {os.getids usage} -body { +test posix-1.1 {os.getids usage} -constraints os.getids -body { os.getids blah } -returnCodes error -result {wrong # args: should be "os.getids"} -test posix-1.2 {os.getids} -body { +test posix-1.2 {os.getids} -constraints os.getids -body { set uid [exec id -u] set d [os.getids] if {$d(uid) != $uid} { @@ -16,21 +16,21 @@ test posix-1.2 {os.getids} -body { } -result {} -test posix-1.4 {os.uptime} -body { +test posix-1.4 {os.uptime} -constraints os.uptime -body { string is integer -strict [os.uptime] } -result {1} -test posix-1.5 {os.gethostname usage} -body { +test posix-1.5 {os.gethostname usage} -constraints os.gethostname -body { os.gethostname blah } -returnCodes error -result {wrong # args: should be "os.gethostname"} -test posix-1.6 {os.gethostname} -body { +test posix-1.6 {os.gethostname} -constraints os.gethostname -body { if {[exec hostname] ne [os.gethostname]} { error "os.gethostname did not match system hostname" } } -result {} -test posix-1.7 {os.fork usage} -body { +test posix-1.7 {os.fork usage} -constraints os.fork -body { os.fork extra args } -returnCodes error -result {wrong # args: should be "os.fork"} |