#puts stdout "launching punk87"

set dirname [file dirname [file normalize [info script]]]
if {[file tail $dirname] eq "bin"} {
    if {[file exists [file join $dirname ../src/punk86.vfs/main.tcl]]} {
        #tclsh [file join $dirname ../src/punk86.vfs/main.tcl] {*}$::argv
        source [file join $dirname ../src/punk86.vfs/main.tcl]
    } else {
        puts stderr "Unable to locate punk87 entry-point main.tcl"
    }
} else {
    puts stderr "punk87 launch script must be run from the punk bin folder"
}
#puts stdout "-done-"