[svn:parrot] r11160 - trunk/languages/tcl/classes

[coke]

Author: coke
Date: Fri Jan 13 13:45:18 2006
New Revision: 11160

Modified:
   trunk/languages/tcl/classes/tcllist.pmc
Log:
tcl -

Bugfix courtesy leo - many tcl tests were temporarily broken, now 100%
again on OSX.


Modified: trunk/languages/tcl/classes/tcllist.pmc
==============================================================================
--- trunk/languages/tcl/classes/tcllist.pmc     (original)
+++ trunk/languages/tcl/classes/tcllist.pmc     Fri Jan 13 13:45:18 2006
@@ -80,7 +80,7 @@ Returns the list as a string
         listToString = Parrot_get_global(INTERP, namespace, sub, NULL);
         CONTEXT(INTERP->ctx)->constants =
           PMC_sub(listToString)->seg->const_table->constants;
-        value        = Parrot_runops_fromc_arglist
+        value        = Parrot_runops_fromc_args
                          (INTERP, listToString, "SP", SELF);
         return value;
     }