diff options
author | Steve Bennett <steveb@workware.net.au> | 2017-08-26 09:40:10 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2017-09-01 09:01:20 +1000 |
commit | 91809091a8ecd0a3640aea0fd68a045142d43596 (patch) | |
tree | 2243715c00765d7f1f5fae37e3ce034164e1d602 /tests/binary.test | |
parent | 52c8b8b6adba1e32b460d44cb0a716db9fda69bc (diff) | |
download | jimtcl-91809091a8ecd0a3640aea0fd68a045142d43596.zip jimtcl-91809091a8ecd0a3640aea0fd68a045142d43596.tar.gz jimtcl-91809091a8ecd0a3640aea0fd68a045142d43596.tar.bz2 |
tests: binary tests require pack on jim
Avoid failing many tests if binary.tcl is available put
pack isn't enabled.
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests/binary.test')
-rw-r--r-- | tests/binary.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/binary.test b/tests/binary.test index 3ba1970..8eb93f9 100644 --- a/tests/binary.test +++ b/tests/binary.test @@ -13,6 +13,9 @@ source [file dirname [info script]]/testing.tcl needs cmd binary +if {[testConstraint jim]} { + needs cmd pack +} testConstraint bigEndian [expr {$tcl_platform(byteOrder) eq "bigEndian"}] testConstraint littleEndian [expr {$tcl_platform(byteOrder) eq "littleEndian"}] testConstraint maxCompatibility 0 |