can't read "dir": no such variable
    while executing
"file join $dir interp.tcl"
    (in namespace eval "::request" script line 2)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)

OUTPUT BUFFER:

if {![package vsatisfies [package provide Tcl] 8.3]} return package ifneeded interp 0.1.2 [list source [file join $dir interp.tcl]] package ifneeded interp::delegate::proc 0.2 [list source [file join $dir deleg_proc.tcl]] package ifneeded interp::delegate::method 0.2 [list source [file join $dir deleg_method.tcl]]