summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2003-01-28 17:59:01 (GMT)
committerdgp <dgp@users.sourceforge.net>2003-01-28 17:59:01 (GMT)
commit315005f7a00a75e53b65a59669c96b4050a5bf6c (patch)
tree24811b720d0ad2d39ed8b4119e8e1e551335d6f4
parent3d55b9414bbdc5a83e0b571616137f34312e668b (diff)
downloadtcl-315005f7a00a75e53b65a59669c96b4050a5bf6c.zip
tcl-315005f7a00a75e53b65a59669c96b4050a5bf6c.tar.gz
tcl-315005f7a00a75e53b65a59669c96b4050a5bf6c.tar.bz2
* tests/main.test: Constrain tests that do not work on Windows.
-rw-r--r--ChangeLog4
-rw-r--r--tests/main.test14
2 files changed, 11 insertions, 7 deletions
diff --git a/ChangeLog b/ChangeLog
index 58f3e27..e812b2f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2003-01-28 Don Porter <dgp@users.sourceforge.net>
+
+ * tests/main.test: Constrain tests that do not work on Windows.
+
2003-01-28 Vince Darley <vincentdarley@users.sourceforge.net>
* generic/tclIOUtil.c: fix to setting modification date
diff --git a/tests/main.test b/tests/main.test
index bb1b8d0..f0ad3c0 100644
--- a/tests/main.test
+++ b/tests/main.test
@@ -1,6 +1,6 @@
# This file contains a collection of tests for generic/tclMain.c.
#
-# RCS: @(#) $Id: main.test,v 1.10 2002/07/03 19:40:31 dgp Exp $
+# RCS: @(#) $Id: main.test,v 1.11 2003/01/28 17:59:12 dgp Exp $
if {[catch {package require tcltest 2.0.2}]} {
puts stderr "Skipping tests in [info script]. tcltest 2.0.2 required."
@@ -77,7 +77,7 @@ namespace eval ::tcl::test::main {
test Tcl_Main-1.3 {
Tcl_Main: encoding of arguments: done by system encoding
- Note the shortcoming explained in Tcl Patch 491789
+ Note the shortcoming explained in Tcl Feature Request 491789
} -constraints {
stdio
} -setup {
@@ -93,9 +93,9 @@ namespace eval ::tcl::test::main {
test Tcl_Main-1.4 {
Tcl_Main: encoding of arguments: done by system encoding
- Note the shortcoming explained in Tcl Patch 491789
+ Note the shortcoming explained in Tcl Feature Request 491789
} -constraints {
- stdio
+ stdio tempNotWin
} -setup {
makeFile {puts [list $argv0 $argv $tcl_interactive]} script
catch {set f [open "|[list [interpreter] script \u20ac]" r]}
@@ -109,7 +109,7 @@ namespace eval ::tcl::test::main {
test Tcl_Main-1.5 {
Tcl_Main: encoding of script name: system encoding loss
- Note the shortcoming explained in Tcl Patch 491789
+ Note the shortcoming explained in Tcl Feature Request 491789
} -constraints {
stdio
} -setup {
@@ -125,9 +125,9 @@ namespace eval ::tcl::test::main {
test Tcl_Main-1.6 {
Tcl_Main: encoding of script name: system encoding loss
- Note the shortcoming explained in Tcl Patch 491789
+ Note the shortcoming explained in Tcl Feature Request 491789
} -constraints {
- stdio
+ stdio tempNotWin
} -setup {
makeFile {puts [list $argv0 $argv $tcl_interactive]} \u20ac
catch {set f [open "|[list [interpreter] \u20ac]" r]}