Posted to tcl by stevel at Thu Sep 03 05:36:54 GMT 2009view pretty
can't read "options(-var)": no such variable while executing "if {$options(-var) eq ""} { # no variable name supplied - use the caller's name upvar 3 avar rv ;# skip some snit nesting ..." invoked from within "$compiler eval $body" (procedure "Comp.Compile" line 62) invoked from within "Comp.Compile type $type $body" (procedure "snit::type" line 2) invoked from within "snit::type mktie { option -var "" ;# variable name in metakit option -vtype S ;# set the variable value type option -layout {} ;# ..." (file "mktie.tcl" line 7)