mingw/lib/reg1.2/pkgIndex.tcl

   1 if {![package vsatisfies [package provide Tcl] 8]} {return}
   2 if {[string compare $::tcl_platform(platform) windows]} {return}
   3 if {[info exists ::tcl_platform(debug)]} {
   4     package ifneeded registry 1.2.1 \
   5             [list load [file join $dir tclreg12g.dll] registry]
   6 } else {
   7     package ifneeded registry 1.2.1 \
   8             [list load [file join $dir tclreg12.dll] registry]
   9 }