diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2001-12-02 22:06:23 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2001-12-02 22:06:23 (GMT) |
| commit | cb09c58ac476c67cd1208b8cdc82cd5351f74f14 (patch) | |
| tree | 08739466561987f66c3c0c53dc73b65d354c280c /tests/safe.test | |
| parent | c5cd0c916f45e37a1c3aee9ae1624a50640fa8b4 (diff) | |
| download | tcl-cb09c58ac476c67cd1208b8cdc82cd5351f74f14.zip tcl-cb09c58ac476c67cd1208b8cdc82cd5351f74f14.tar.gz tcl-cb09c58ac476c67cd1208b8cdc82cd5351f74f14.tar.bz2 | |
Added field to tcl_platform to describe the machine-word size.
Diffstat (limited to 'tests/safe.test')
| -rw-r--r-- | tests/safe.test | 16 |
1 files changed, 2 insertions, 14 deletions
diff --git a/tests/safe.test b/tests/safe.test index 2eb6788..115207c 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.10 2000/11/17 11:06:54 dkf Exp $ +# RCS: @(#) $Id: safe.test,v 1.10.12.1 2001/12/02 22:06:23 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -185,7 +185,7 @@ test safe-6.3 {test safe interpreters knowledge of the world} { set r [lreplace $r $threaded $threaded] } set r -} {byteOrder platform} +} {byteOrder platform wordSize} # more test should be added to check that hostname, nameofexecutable, # aren't leaking infos, but they still do... @@ -518,15 +518,3 @@ test safe-11.8 {testing safe encoding} { # cleanup ::tcltest::cleanupTests return - - - - - - - - - - - - |