[svn:parrot] r36530 - in branches/kill_pccinvoke: include/parrot src src/call

allison at svn.parrot.org allison at svn.parrot.org
Tue Feb 10 05:42:08 UTC 2009


Author: allison
Date: Tue Feb 10 05:42:06 2009
New Revision: 36530
URL: https://trac.parrot.org/parrot/changeset/36530

Log:
[pcc] Add the subsystem prefix to the function for building call
signature objects.

Modified:
   branches/kill_pccinvoke/include/parrot/call.h
   branches/kill_pccinvoke/src/call/pcc.c
   branches/kill_pccinvoke/src/multidispatch.c

Modified: branches/kill_pccinvoke/include/parrot/call.h
==============================================================================
--- branches/kill_pccinvoke/include/parrot/call.h	Tue Feb 10 05:11:32 2009	(r36529)
+++ branches/kill_pccinvoke/include/parrot/call.h	Tue Feb 10 05:42:06 2009	(r36530)
@@ -94,7 +94,7 @@
 PARROT_EXPORT
 PARROT_WARN_UNUSED_RESULT
 PARROT_CANNOT_RETURN_NULL
-PMC* Parrot_build_sig_object_from_varargs(PARROT_INTERP,
+PMC* Parrot_pcc_build_sig_object_from_varargs(PARROT_INTERP,
     ARGIN_NULLOK(PMC* obj),
     ARGIN(const char *sig),
     va_list args)
@@ -278,7 +278,7 @@
         __attribute__nonnull__(1)
         __attribute__nonnull__(3);
 
-#define ASSERT_ARGS_Parrot_build_sig_object_from_varargs \
+#define ASSERT_ARGS_Parrot_pcc_build_sig_object_from_varargs \
      __attribute__unused__ int _ASSERT_ARGS_CHECK = \
        PARROT_ASSERT_ARG(interp) \
     || PARROT_ASSERT_ARG(sig)

Modified: branches/kill_pccinvoke/src/call/pcc.c
==============================================================================
--- branches/kill_pccinvoke/src/call/pcc.c	Tue Feb 10 05:11:32 2009	(r36529)
+++ branches/kill_pccinvoke/src/call/pcc.c	Tue Feb 10 05:42:06 2009	(r36530)
@@ -348,7 +348,7 @@
 
 /*
 
-=item C<PMC* Parrot_build_sig_object_from_varargs>
+=item C<PMC* Parrot_pcc_build_sig_object_from_varargs>
 
 Take a varargs list, and convert it into a CallSignature PMC. The CallSignature
 stores the original short signature string, and an array of integer types to
@@ -362,10 +362,10 @@
 PARROT_WARN_UNUSED_RESULT
 PARROT_CANNOT_RETURN_NULL
 PMC*
-Parrot_build_sig_object_from_varargs(PARROT_INTERP, ARGIN_NULLOK(PMC* obj),
+Parrot_pcc_build_sig_object_from_varargs(PARROT_INTERP, ARGIN_NULLOK(PMC* obj),
         ARGIN(const char *sig), va_list args)
 {
-    ASSERT_ARGS(Parrot_build_sig_object_from_varargs)
+    ASSERT_ARGS(Parrot_pcc_build_sig_object_from_varargs)
     PMC         *type_tuple    = PMCNULL;
     PMC         *returns       = PMCNULL;
     PMC         *call_object   = pmc_new(interp, enum_class_CallSignature);
@@ -2621,7 +2621,7 @@
     PMC *sig_obj;
     va_list args;
     va_start(args, sig);
-    sig_obj = Parrot_build_sig_object_from_varargs(interp, PMCNULL, sig, args);
+    sig_obj = Parrot_pcc_build_sig_object_from_varargs(interp, PMCNULL, sig, args);
     va_end(args);
 
     Parrot_pcc_invoke_from_sig_object(interp, sub_obj, sig_obj);
@@ -2881,7 +2881,7 @@
     PMC *sub_obj;
     va_list args;
     va_start(args, signature);
-    sig_obj = Parrot_build_sig_object_from_varargs(interp, pmc, signature, args);
+    sig_obj = Parrot_pcc_build_sig_object_from_varargs(interp, pmc, signature, args);
     va_end(args);
 
     /* Find the subroutine object as a named method on pmc */

Modified: branches/kill_pccinvoke/src/multidispatch.c
==============================================================================
--- branches/kill_pccinvoke/src/multidispatch.c	Tue Feb 10 05:11:32 2009	(r36529)
+++ branches/kill_pccinvoke/src/multidispatch.c	Tue Feb 10 05:42:06 2009	(r36530)
@@ -306,7 +306,7 @@
 
     va_list args;
     va_start(args, sig);
-    sig_object = Parrot_build_sig_object_from_varargs(interp, PMCNULL, sig, args);
+    sig_object = Parrot_pcc_build_sig_object_from_varargs(interp, PMCNULL, sig, args);
     va_end(args);
 
     /* Check the cache. */


More information about the parrot-commits mailing list