diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-11-03 15:32:46 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-11-03 15:32:46 (GMT) |
commit | 8607752aa65f484ab844296ce90d2d2e5bfc2259 (patch) | |
tree | 645dfbaee93b71a5ba9a4458772d4b4719c83ae1 /tests/link.test | |
parent | 3b0ee42270085b039b75e2e27a3a145399a1bfac (diff) | |
download | tcl-8607752aa65f484ab844296ce90d2d2e5bfc2259.zip tcl-8607752aa65f484ab844296ce90d2d2e5bfc2259.tar.gz tcl-8607752aa65f484ab844296ce90d2d2e5bfc2259.tar.bz2 |
Case-sensitive package names
Diffstat (limited to 'tests/link.test')
-rw-r--r-- | tests/link.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/link.test b/tests/link.test index 89e5aa2..a95f241 100644 --- a/tests/link.test +++ b/tests/link.test @@ -17,7 +17,7 @@ if {"::tcltest" ni [namespace children]} { } ::tcltest::loadTestedCommands -catch [list package require -exact Tcltest [info patchlevel]] +catch [list package require -exact tcl::test [info patchlevel]] testConstraint testlink [llength [info commands testlink]] testConstraint testlinkarray [llength [info commands testlinkarray]] @@ -28,7 +28,7 @@ foreach i {int real bool string} { test link-0.1 {leak test} {testlink} { interp create i - load {} Tcltest i + load {} tcl::test i i eval { testlink create 1 0 0 0 0 0 0 0 0 0 0 0 0 0 namespace delete :: |