Author: mdiep Date: Wed Apr 19 13:27:50 2006 New Revision: 12381 Modified: trunk/languages/tcl/runtime/builtin/global.pir
Log: tcl: Fix [global]. All tests pass. Modified: trunk/languages/tcl/runtime/builtin/global.pir ============================================================================== --- trunk/languages/tcl/runtime/builtin/global.pir (original) +++ trunk/languages/tcl/runtime/builtin/global.pir Wed Apr 19 13:27:50 2006 @@ -28,7 +28,7 @@ sigil_varname = "$" . varname push_eh next - $P1 = find_global "Tcl", sigil_varname + $P1 = find_global sigil_varname clear_eh .local pmc store_lex_pdd20
