[svn:parrot] r45383 - trunk/src

[NotFound at svn.parrot.org]

Author: NotFound
Date: Fri Apr  2 15:25:20 2010
New Revision: 45383
URL: https://trac.parrot.org/parrot/changeset/45383

Log:
use init_int in mmd_cvt_to_types

Modified:
   trunk/src/multidispatch.c

Modified: trunk/src/multidispatch.c
==============================================================================
--- trunk/src/multidispatch.c	Fri Apr  2 15:16:57 2010	(r45382)
+++ trunk/src/multidispatch.c	Fri Apr  2 15:25:20 2010	(r45383)
@@ -517,10 +517,8 @@
             type = Parrot_pmc_get_type(interp, sig_elem);
 
         /* create destination PMC only as necessary */
-        if (PMC_IS_NULL(ar)) {
-            ar = Parrot_pmc_new(interp, enum_class_FixedIntegerArray);
-            VTABLE_set_integer_native(interp, ar, n);
-        }
+        if (PMC_IS_NULL(ar))
+            ar = Parrot_pmc_new_init_int(interp, enum_class_FixedIntegerArray, n);
 
         VTABLE_set_integer_keyed_int(interp, ar, i, type);
     }