can't read "dir": no such variable
    while executing
"file join $dir fa.tcl"
    (in namespace eval "::request" script line 3)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
if {![package vsatisfies [package provide Tcl] 8.4]} {return}

package ifneeded grammar::fa            0.5   [list source [file join $dir fa.tcl]]
package ifneeded grammar::fa::op        0.4.1 [list source [file join $dir faop.tcl]]
package ifneeded grammar::fa::dacceptor 0.1.1 [list source [file join $dir dacceptor.tcl]]
package ifneeded grammar::fa::dexec     0.2   [list source [file join $dir dexec.tcl]]