From f4151635b12b2c9b62d1b638b7096875bb65bc76 Mon Sep 17 00:00:00 2001 From: dgp Date: Thu, 25 Sep 2008 18:06:17 +0000 Subject: * tests/platform.test: Update tests to expect revised results * tests/safe.test: corresponding to the TIP 315 change. --- ChangeLog | 3 +++ tests/platform.test | 2 +- tests/safe.test | 4 ++-- 3 files changed, 6 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index 7ae0b15..30b94f0 100644 --- a/ChangeLog +++ b/ChangeLog @@ -2,6 +2,9 @@ TIP #315 IMPLEMENTATION + * tests/platform.test: Update tests to expect revised results + * tests/safe.test: corresponding to the TIP 315 change. + * unix/tclUnixInit.c, win/tclWinInit.c (TclpSetVariables): * doc/tclvars.n (tcl_platform): Define what character is used for separating PATH-like lists. Forms part of the tcl_platform array. 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... -- cgit v0.12