blob: 09ef4b0d05ef3df2c65e7c83a03f99b259afa4b1 (
plain)
1
2
3
4
5
6
7
8
|
if {![package vsatisfies [package provide Tcl] 8]} {return}
if {[info exists tcl_platform(debug)]} {
package ifneeded registry 1.0 \
[list load [file join $dir tclreg10d.dll] registry]
} else {
package ifneeded registry 1.0 \
[list load [file join $dir tclreg10.dll] registry]
}
|