mirror of
https://github.com/ColugoMum/Smart_container.git
synced 2025-06-03 21:54:04 +08:00
10 lines
345 B
Tcl
10 lines
345 B
Tcl
if {([info commands ::tcl::pkgconfig] eq "")
|
|
|| ([info sharedlibextension] ne ".dll")} return
|
|
if {[::tcl::pkgconfig get debug]} {
|
|
package ifneeded registry 1.3.3 \
|
|
[list load [file join $dir tclreg13g.dll] registry]
|
|
} else {
|
|
package ifneeded registry 1.3.3 \
|
|
[list load [file join $dir tclreg13.dll] registry]
|
|
}
|