Artifact e805eb920349531ebe4e44c588d424dee4c0e816:

• File pkgIndex.tcl — part of check-in [0a35f2eba3] at 2003-05-30 16:38:47 on branch trunk — Changes for version 3.0 (user: ramsan size: 670)

set Version 3.0

proc LoadRamDebugger { dir } {

    if { [interp exists ramdebugger] } { interp delete ramdebugger }
    interp create ramdebugger
    interp alias ramdebugger master "" eval
    ramdebugger eval [list load {} Tk]
    ramdebugger eval { set argc 0 ; set argv "" }
    ramdebugger eval [list set auto_path $::auto_path]
    ramdebugger eval [list set argv0 [file join $dir RamDebugger.tcl]]
    ramdebugger eval [list source [file join $dir RamDebugger.tcl]]
    package provide RamDebugger $::Version
    update idletasks
}
if {![package vsatisfies [package provide Tcl] 8.3]} {return}
package ifneeded RamDebugger $Version [list LoadRamDebugger $dir]