1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
+
+
|
if {[package vsatisfies [package present Tcl] 8.5]} {
package ifneeded tls @PACKAGE_VERSION@ [list apply {{dir} {
if {{@TCLEXT_BUILD@} eq "static"} {
load {} Tls
} else {
load [file join $dir tcltls.@SHOBJEXT@] Tls
}
set tlsTclInitScript [file join $dir tls.tcl]
if {[file exists $tlsTclInitScript]} {
source $tlsTclInitScript
}
}} $dir]
} elseif {[package vsatisfies [package present Tcl] 8.4]} {
package ifneeded tls @PACKAGE_VERSION@ [list load [file join $dir tcltls.@SHOBJEXT@] Tls]
}
|