1 if {![package vsatisfies
[package provide
Tcl] 8]} return
2 if {[info sharedlibextension
] != ".dll"} return
3 if {[info exists
::tcl_platform(debug
)]} {
4 package ifneeded
dde 1.3.3 [list load [file join $dir tcldde13g.dll
] dde]
6 package ifneeded
dde 1.3.3 [list load [file join $dir tcldde13.dll
] dde]