[svn:parrot] r44043 - in branches/pmc_func_cleanup: lib/Parrot/Pmc2c t/src

[whiteknight at svn.parrot.org]

Author: whiteknight
Date: Tue Feb 16 20:30:25 2010
New Revision: 44043
URL: https://trac.parrot.org/parrot/changeset/44043

Log:
last two changes that I can find in the core repo. Parrot builds and passes all coretests

Modified:
   branches/pmc_func_cleanup/lib/Parrot/Pmc2c/UtilFunctions.pm
   branches/pmc_func_cleanup/t/src/extend.t

Modified: branches/pmc_func_cleanup/lib/Parrot/Pmc2c/UtilFunctions.pm
==============================================================================
--- branches/pmc_func_cleanup/lib/Parrot/Pmc2c/UtilFunctions.pm	Tue Feb 16 20:02:39 2010	(r44042)
+++ branches/pmc_func_cleanup/lib/Parrot/Pmc2c/UtilFunctions.pm	Tue Feb 16 20:30:25 2010	(r44043)
@@ -173,7 +173,7 @@
         my $lhs = $info->{flags}{no_init} ? "" : "type$class = ";
         $cout .= <<"EOC";
     whoami = CONST_STRING_GEN(interp, "$class");
-    ${lhs}pmc_register(interp, whoami);
+    ${lhs}Parrot_pmc_register_new_type(interp, whoami);
 EOC
     }
     $cout .= <<"EOC";

Modified: branches/pmc_func_cleanup/t/src/extend.t
==============================================================================
--- branches/pmc_func_cleanup/t/src/extend.t	Tue Feb 16 20:02:39 2010	(r44042)
+++ branches/pmc_func_cleanup/t/src/extend.t	Tue Feb 16 20:30:25 2010	(r44043)
@@ -454,7 +454,7 @@
 
     name = Parrot_str_new_constant(interp, "_sub2");
     sub  = Parrot_find_global_cur(interp, name);
-    arg  = pmc_new(interp, enum_class_String);
+    arg  = Parrot_pmc_new(interp, enum_class_String);
 
     Parrot_PMC_set_string_native(interp, arg,
                  Parrot_str_new(interp, "hello ", 0));
@@ -512,7 +512,7 @@
 
     name = Parrot_str_new_constant(interp, "_sub2");
     sub  = Parrot_find_global_cur(interp, name);
-    arg  = pmc_new(interp, enum_class_String);
+    arg  = Parrot_pmc_new(interp, enum_class_String);
 
     Parrot_PMC_set_string_native(interp, arg,
                  Parrot_str_new(interp, "hello ", 0));
@@ -581,7 +581,7 @@
 
     Parrot_pbc_load(interp, pf);
     sub  = Parrot_find_global_cur(interp, name);
-    arg  = pmc_new(interp, enum_class_String);
+    arg  = Parrot_pmc_new(interp, enum_class_String);
 
     Parrot_PMC_set_string_native(interp, arg,
                  Parrot_str_new(interp, "hello ", 0));