10 lines
358 B
Tcl
10 lines
358 B
Tcl
|
if {![package vsatisfies [package provide Tcl] 8.5]} return
|
||
|
|
if {[info sharedlibextension] != ".dll"} return
|
||
|
|
if {[::tcl::pkgconfig get debug]} {
|
||
|
|
package ifneeded registry 1.3.5 \
|
||
|
|
[list load [file join $dir tclreg13g.dll] Registry]
|
||
|
|
} else {
|
||
|
|
package ifneeded registry 1.3.5 \
|
||
|
|
[list load [file join $dir tclreg13.dll] Registry]
|
||
|
|
}
|