[svn:parrot] r45393 - trunk/src/pmc

NotFound at svn.parrot.org NotFound at svn.parrot.org
Sat Apr 3 13:08:04 UTC 2010


Author: NotFound
Date: Sat Apr  3 13:08:03 2010
New Revision: 45393
URL: https://trac.parrot.org/parrot/changeset/45393

Log:
use init_int in get_named_names

Modified:
   trunk/src/pmc/callcontext.pmc

Modified: trunk/src/pmc/callcontext.pmc
==============================================================================
--- trunk/src/pmc/callcontext.pmc	Sat Apr  3 07:02:01 2010	(r45392)
+++ trunk/src/pmc/callcontext.pmc	Sat Apr  3 13:08:03 2010	(r45393)
@@ -382,8 +382,7 @@
     /* yes, this *looks* risky, but it's a Parrot STRING hash internally */
     if (hash && hash->entries) {
         UINTVAL i, j = 0;
-        result = Parrot_pmc_new(interp, enum_class_FixedStringArray);
-        VTABLE_set_integer_native(interp, result, hash->entries);
+        result = Parrot_pmc_new_init_int(interp, enum_class_FixedStringArray, hash->entries);
 
         for (i = 0; i <= hash->mask; i++) {
             HashBucket *b = hash->bi[i];


More information about the parrot-commits mailing list