* tests/platform.test: Update tests to expect revised results

        * tests/safe.test:      corresponding to the TIP 315 change.

2 files changed, 3 insertions, 3 deletions

diff --git a/tests/platform.test b/tests/platform.test
index 7eda53c..fd9ed66 100644
--- a/tests/platform.test
+++ b/tests/platform.test
@@ -25,7 +25,7 @@ test platform-1.1 {TclpSetVariables: tcl_platform} {
     set result [i eval {lsort [array names tcl_platform]}]
     interp delete i
     set result
-} {byteOrder machine os osVersion platform pointerSize user wordSize}
+} {byteOrder machine os osVersion pathSeparator platform pointerSize user wordSize}
 
 # Test assumes twos-complement arithmetic, which is true of virtually
 # everything these days.  Note that this does *not* use wide(), and
diff --git a/tests/safe.test b/tests/safe.test
index fb66f8c..a97ea51 100644
--- a/tests/safe.test
+++ b/tests/safe.test
@@ -10,7 +10,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: safe.test,v 1.23 2008/06/25 17:40:05 andreas_kupries Exp $
+# RCS: @(#) $Id: safe.test,v 1.24 2008/09/25 18:06:44 dgp Exp $
 
 package require Tcl 8.5
 
@@ -184,7 +184,7 @@ test safe-6.3 {test safe interpreters knowledge of the world} {
 	set r [lreplace $r $threaded $threaded]
     }
     set r
-} {byteOrder platform pointerSize wordSize}
+} {byteOrder pathSeparator platform pointerSize wordSize}
 
 # more test should be added to check that hostname, nameofexecutable,
 # aren't leaking infos, but they still do...