diff options
| -rw-r--r-- | tests/canvPs.test | 8 | ||||
| -rw-r--r-- | tests/font.test | 2 |
2 files changed, 5 insertions, 5 deletions
diff --git a/tests/canvPs.test b/tests/canvPs.test index c7ba958..5e8a4e5 100644 --- a/tests/canvPs.test +++ b/tests/canvPs.test @@ -19,7 +19,7 @@ pack .c update test canvPs-1.1 {test writing to a file} -constraints { - unixOrPc + unixOrWin } -setup { set foo [makeFile {} foo.ps] } -body { @@ -29,7 +29,7 @@ test canvPs-1.1 {test writing to a file} -constraints { removeFile foo.ps } -result 1 test canvPs-1.2 {test writing to a file, idempotency} -constraints { - unixOrPc + unixOrWin } -setup { set foo [makeFile {} foo.ps] set bar [makeFile {} bar.ps] @@ -48,7 +48,7 @@ test canvPs-1.2 {test writing to a file, idempotency} -constraints { test canvPs-2.1 {test writing to a channel} -constraints { - unixOrPc + unixOrWin } -setup { set foo [makeFile {} foo.ps] file delete $foo @@ -62,7 +62,7 @@ test canvPs-2.1 {test writing to a channel} -constraints { removeFile foo.ps } -result 1 test canvPs-2.2 {test writing to channel, idempotency} -constraints { - unixOrPc + unixOrWin } -setup { set foo [makeFile {} foo.ps] set bar [makeFile {} bar.ps] diff --git a/tests/font.test b/tests/font.test index c7f1a43..d5b41d9 100644 --- a/tests/font.test +++ b/tests/font.test @@ -2255,7 +2255,7 @@ test font-38.10 {ParseFontNameObj procedure: arguments} -body { font actual {times xyz xyz} } -returnCodes error -result {expected integer but got "xyz"} test font-38.11 {ParseFontNameObj procedure: stylelist loop} -constraints { - unixOrPc + unixOrWin } -body { lrange [font actual {times 12 bold italic overstrike underline}] 4 end } -result {-weight bold -slant italic -underline 1 -overstrike 1} |