# Tcl package index file, version 1.1

proc LoadToltcl { version dir } {
  global tcl_platform
 
  set _version [ string map [ list "." "" ] $version ]
  if {[info exist ::env(USE_TOLTCL_$_version)]} {
    puts "requested to load Toltcl from $::env(USE_TOLTCL_$_version)"
    load $::env(USE_TOLTCL_$_version)
  } else {
    set suffix [info sharedlibextension]
    if {$tcl_platform(platform) eq "unix"} {
      set name libtoltcl${version}[info sharedlibextension]
    } else  {
      set name toltcl.dll
    }
    load [file join $dir {@TOLTCL_LIB_NAME@}] Toltcl
  }
}

package ifneeded Toltcl @TOLTCL_VERSION_MAJOR@.@TOLTCL_VERSION_MINOR@ \
    [ string map [list %d $dir] {
      LoadToltcl @TOLTCL_VERSION_MAJOR@.@TOLTCL_VERSION_MINOR@ {%d}
      source [ file join {%d} toltcl.tcl ]
    } ]

package ifneeded TolshApp @TOLTCL_VERSION_MAJOR@.@TOLTCL_VERSION_MINOR@ \
    [ string map [list %d $dir] {
      source [ file join {%d} tolsh.tcl ]
      set tolsh_version @TOLTCL_VERSION_MAJOR@.@TOLTCL_VERSION_MINOR@
      package provide TolshApp @TOLTCL_VERSION_MAJOR@.@TOLTCL_VERSION_MINOR@      
    } ]