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

NotFound at svn.parrot.org NotFound at svn.parrot.org
Thu Apr 29 14:04:16 UTC 2010


Author: NotFound
Date: Thu Apr 29 14:04:16 2010
New Revision: 46139
URL: https://trac.parrot.org/parrot/changeset/46139

Log:
[cage] replace several string_from_literal with CONST_STRING

Modified:
   trunk/src/pmc/fixedpmcarray.pmc
   trunk/src/pmc/key.pmc
   trunk/src/pmc/resizablestringarray.pmc

Modified: trunk/src/pmc/fixedpmcarray.pmc
==============================================================================
--- trunk/src/pmc/fixedpmcarray.pmc	Thu Apr 29 13:47:31 2010	(r46138)
+++ trunk/src/pmc/fixedpmcarray.pmc	Thu Apr 29 14:04:16 2010	(r46139)
@@ -308,7 +308,7 @@
         PMC * const retval = SELF.get_pmc_keyed_int(key);
 
         if (PMC_IS_NULL(retval))
-            return string_from_literal(interp, "");
+            return CONST_STRING(interp, "");
 
         return VTABLE_get_string(INTERP, retval);
     }

Modified: trunk/src/pmc/key.pmc
==============================================================================
--- trunk/src/pmc/key.pmc	Thu Apr 29 13:47:31 2010	(r46138)
+++ trunk/src/pmc/key.pmc	Thu Apr 29 14:04:16 2010	(r46139)
@@ -156,7 +156,7 @@
         if (PObj_get_FLAGS(SELF) & KEY_type_FLAGS)
             return key_string(INTERP, SELF);
 
-        return string_from_literal(INTERP, "");
+        return CONST_STRING(INTERP, "");
     }
 
 /*

Modified: trunk/src/pmc/resizablestringarray.pmc
==============================================================================
--- trunk/src/pmc/resizablestringarray.pmc	Thu Apr 29 13:47:31 2010	(r46138)
+++ trunk/src/pmc/resizablestringarray.pmc	Thu Apr 29 14:04:16 2010	(r46139)
@@ -54,7 +54,7 @@
         }
 
         if (key >= size)
-            return string_from_literal(INTERP, "");
+            return CONST_STRING(INTERP, "");
 
         GET_ATTR_str_array(INTERP, SELF, str_array);
 


More information about the parrot-commits mailing list