summaryrefslogtreecommitdiffstats
path: root/tests/info.test
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2010-02-10 23:24:25 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2010-02-10 23:24:25 (GMT)
commit97ddceae2735bb515100b9880a07e2fc9defab4d (patch)
tree66f1d15ec76a50682817b877f292a4b82395bc26 /tests/info.test
parent828f72e7957c659ea67bfae6c63ecbcb221e1bb7 (diff)
downloadtcl-97ddceae2735bb515100b9880a07e2fc9defab4d.zip
tcl-97ddceae2735bb515100b9880a07e2fc9defab4d.tar.gz
tcl-97ddceae2735bb515100b9880a07e2fc9defab4d.tar.bz2
Remove assumption of ordered results from [info procs]
Diffstat (limited to 'tests/info.test')
-rw-r--r--tests/info.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/info.test b/tests/info.test
index 8b7729c..28fee2c 100644
--- a/tests/info.test
+++ b/tests/info.test
@@ -13,7 +13,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: info.test,v 1.74 2010/01/10 22:58:41 nijtmans Exp $
+# RCS: @(#) $Id: info.test,v 1.75 2010/02/10 23:24:25 dkf Exp $
if {{::tcltest} ni [namespace children]} {
package require tcltest 2
@@ -491,7 +491,7 @@ test info-15.4 {info procs option} -setup {
namespace eval test_ns_info2 {
namespace import ::test_ns_info1::*
proc r {} {}
- list [info procs] [info procs p*]
+ list [lsort [info procs]] [info procs p*]
}
} -result {{p q r} p}
test info-15.5 {info procs option with a proc in a namespace} -setup {