summaryrefslogtreecommitdiffstats
path: root/tests/binary.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2021-04-14 17:12:37 (GMT)
committerdgp <dgp@users.sourceforge.net>2021-04-14 17:12:37 (GMT)
commit4601095e9c74846db013178157e24922857989da (patch)
tree9aca007febedeb23d51edc5a47d6c4dca1170fe6 /tests/binary.test
parent1bb28a6c4446925e1de0ae4b83a95734c214924d (diff)
parentf334a082fc92d567fed5662b9c25986ccd5577df (diff)
downloadtcl-4601095e9c74846db013178157e24922857989da.zip
tcl-4601095e9c74846db013178157e24922857989da.tar.gz
tcl-4601095e9c74846db013178157e24922857989da.tar.bz2
merge trunk
Diffstat (limited to 'tests/binary.test')
-rw-r--r--tests/binary.test3
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/binary.test b/tests/binary.test
index a910390..56f5920 100644
--- a/tests/binary.test
+++ b/tests/binary.test
@@ -14,6 +14,9 @@ if {"::tcltest" ni [namespace children]} {
package require tcltest 2.5
namespace import -force ::tcltest::*
}
+::tcltest::loadTestedCommands
+catch [list package require -exact tcl::test [info patchlevel]]
+
testConstraint bigEndian [expr {$tcl_platform(byteOrder) eq "bigEndian"}]
testConstraint littleEndian [expr {$tcl_platform(byteOrder) eq "littleEndian"}]
testConstraint testbytestring [llength [info commands testbytestring]]