#! /bin/sh
# the next line restarts using wish \
exec /usr/local/bin/wish8.4 "$0" ${1+"$@"}
set myName [info script]
if {![catch {
    set linkName [file readlink $myName]
}]} {
    set myName $linkName
}
source [file join [file dirname $myName] /usr/local/lib/gorilla/gorilla.tcl]