[svn:parrot] r41727 - branches/pcc_reapply/src/call

mikehh at svn.parrot.org mikehh at svn.parrot.org
Mon Oct 5 03:03:56 UTC 2009


Author: mikehh
Date: Mon Oct  5 03:03:48 2009
New Revision: 41727
URL: https://trac.parrot.org/parrot/changeset/41727

Log:
codetest fixes - remove C++ comment, linelength

Modified:
   branches/pcc_reapply/src/call/args.c

Modified: branches/pcc_reapply/src/call/args.c
==============================================================================
--- branches/pcc_reapply/src/call/args.c	Mon Oct  5 01:28:57 2009	(r41726)
+++ branches/pcc_reapply/src/call/args.c	Mon Oct  5 03:03:48 2009	(r41727)
@@ -391,7 +391,8 @@
                     pmc_value = CTX_REG_PMC(ctx, raw_index);
 
                 if (arg_flags & PARROT_ARG_FLATTEN) {
-                    STRING * const flat_list = dissect_aggregate_arg(interp, call_object, pmc_value);
+                    STRING * const flat_list = dissect_aggregate_arg(
+                                                   interp, call_object, pmc_value);
                     string_sig = Parrot_str_append(interp, string_sig, flat_list);
                 }
                 else {
@@ -1702,7 +1703,7 @@
 {
     ASSERT_ARGS(intval_constant_from_op)
     const INTVAL raw_index      = raw_params[param_index + 2];
-    return raw_index; //Parrot_pcc_get_int_constant(interp, CURRENT_CONTEXT(interp), raw_index);
+    return raw_index;
 }
 
 static FLOATVAL
@@ -1815,7 +1816,10 @@
 {
     ASSERT_ARGS(clone_key_arg)
 
-    /* This function is sligtly broken. We need correct way to calculate caller_ctx to clone Keys */
+    /*
+     * This function is sligtly broken. We need correct way to calculate caller_ctx to clone Keys
+     */
+
     return key;
 
     if (PMC_IS_NULL(key))
@@ -1831,9 +1835,11 @@
             Regs_ni bp;
             Regs_ps bp_ps;
             PMC *res;
-            /* XXX We are 2 levels below original Key Context. Why? */
-            /* Next line intentionally left too long to bring attention */
-            PMC *caller_ctx = Parrot_pcc_get_caller_ctx(interp, Parrot_pcc_get_caller_ctx(interp, CURRENT_CONTEXT(interp)));
+            /*
+             * XXX We are 2 levels below original Key Context. Why?
+             */
+            PMC *caller_ctx = Parrot_pcc_get_caller_ctx(
+                              interp, Parrot_pcc_get_caller_ctx(interp, CURRENT_CONTEXT(interp)));
 
             PARROT_ASSERT(!PMC_IS_NULL(caller_ctx) || !"Need caller_ctx to clone Key");
 


More information about the parrot-commits mailing list