Author: mdiep Date: Mon Mar 13 20:30:55 2006 New Revision: 11895 Modified: trunk/languages/tcl/src/compiler.pir
Log: Fix tcl Modified: trunk/languages/tcl/src/compiler.pir ============================================================================== --- trunk/languages/tcl/src/compiler.pir (original) +++ trunk/languages/tcl/src/compiler.pir Mon Mar 13 20:30:55 2006 @@ -182,7 +182,8 @@ .local pmc pir_compiler pir_compiler = compreg "PIR" - .return pir_compiler(pir_code) + $P0 = pir_compiler(pir_code) + .return($P0) .end =back
