blob: db8a5ef0c36bf42e011ee5e462d9584bf8ca3f8b (
plain)
1
2
3
4
5
6
7
|
if {[info exists tcl_platform(debug)]} {
package ifneeded registry 1.0 \
[list load [file join $dir tclreg82d.dll] registry]
} else {
package ifneeded registry 1.0 \
[list load [file join $dir tclreg82.dll] registry]
}
|