[svn:parrot] r36613 - branches/rename_pccinvoke/src

whiteknight at svn.parrot.org whiteknight at svn.parrot.org
Thu Feb 12 00:38:14 UTC 2009


Author: whiteknight
Date: Thu Feb 12 00:38:13 2009
New Revision: 36613
URL: https://trac.parrot.org/parrot/changeset/36613

Log:
[rename_pccinvoke] fix the test failure that was blocking my work months ago, and convert src/debug.c

Modified:
   branches/rename_pccinvoke/src/debug.c
   branches/rename_pccinvoke/src/global.c

Modified: branches/rename_pccinvoke/src/debug.c
==============================================================================
--- branches/rename_pccinvoke/src/debug.c	Thu Feb 12 00:19:15 2009	(r36612)
+++ branches/rename_pccinvoke/src/debug.c	Thu Feb 12 00:38:13 2009	(r36613)
@@ -1269,8 +1269,7 @@
         STRING *s= Parrot_str_new(interpdeb, NULL, 0);
         PMC *tmp_stdin = Parrot_io_stdhandle(interpdeb, 0, NULL);
 
-        Parrot_PCCINVOKE(interpdeb,
-            tmp_stdin, readline,
+        Parrot_pcc_invoke_method_from_c_args(interpdeb, tmp_stdin, readline,
             "S->S", prompt, & s);
         {
         char * aux = Parrot_str_to_cstring(interpdeb, s);

Modified: branches/rename_pccinvoke/src/global.c
==============================================================================
--- branches/rename_pccinvoke/src/global.c	Thu Feb 12 00:19:15 2009	(r36612)
+++ branches/rename_pccinvoke/src/global.c	Thu Feb 12 00:38:13 2009	(r36613)
@@ -429,7 +429,7 @@
 Parrot_ns_get_name(PARROT_INTERP, ARGIN(PMC *_namespace))
 {
     ASSERT_ARGS(Parrot_ns_get_name)
-    PMC *names;
+    PMC *names = PMCNULL;
     Parrot_pcc_invoke_method_from_c_args(interp, _namespace, CONST_STRING(interp, "get_name"), "->P", &names);
     return names;
 }


More information about the parrot-commits mailing list