8 lines
297 B
Tcl
8 lines
297 B
Tcl
|
if {([info commands ::tcl::pkgconfig] eq "")
|
||
|
|
|| ([info sharedlibextension] ne ".dll")} return
|
||
|
|
if {[::tcl::pkgconfig get debug]} {
|
||
|
|
package ifneeded dde 1.4.0 [list load [file join $dir tcldde14g.dll] dde]
|
||
|
|
} else {
|
||
|
|
package ifneeded dde 1.4.0 [list load [file join $dir tcldde14.dll] dde]
|
||
|
|
}
|