[svn:parrot] r41586 - in branches/pcc_reapply: lib/Parrot/Pmc2c src/call src/ops

jkeenan at svn.parrot.org jkeenan at svn.parrot.org
Thu Oct 1 01:28:50 UTC 2009


Author: jkeenan
Date: Thu Oct  1 01:28:48 2009
New Revision: 41586
URL: https://trac.parrot.org/parrot/changeset/41586

Log:
Make files conform to linelength and trailingspace coding standards.

Modified:
   branches/pcc_reapply/lib/Parrot/Pmc2c/PCCMETHOD.pm
   branches/pcc_reapply/src/call/pcc.c
   branches/pcc_reapply/src/ops/core.ops

Modified: branches/pcc_reapply/lib/Parrot/Pmc2c/PCCMETHOD.pm
==============================================================================
--- branches/pcc_reapply/lib/Parrot/Pmc2c/PCCMETHOD.pm	Thu Oct  1 00:00:39 2009	(r41585)
+++ branches/pcc_reapply/lib/Parrot/Pmc2c/PCCMETHOD.pm	Thu Oct  1 01:28:48 2009	(r41586)
@@ -407,9 +407,9 @@
     _ctx = CURRENT_CONTEXT(interp);
     _ccont = Parrot_pcc_get_continuation(interp, _ctx);
 
-    _caller_ctx = Parrot_pcc_get_caller_ctx(interp, _ctx); 
-    _call_object = Parrot_pcc_get_signature(interp, _ctx); 
-    Parrot_pcc_set_signature(interp, _ctx, NULL); 
+    _caller_ctx = Parrot_pcc_get_caller_ctx(interp, _ctx);
+    _call_object = Parrot_pcc_get_signature(interp, _ctx);
+    Parrot_pcc_set_signature(interp, _ctx, NULL);
 
     { /* BEGIN PARMS SCOPE */
 END

Modified: branches/pcc_reapply/src/call/pcc.c
==============================================================================
--- branches/pcc_reapply/src/call/pcc.c	Thu Oct  1 00:00:39 2009	(r41585)
+++ branches/pcc_reapply/src/call/pcc.c	Thu Oct  1 01:28:48 2009	(r41586)
@@ -661,7 +661,7 @@
      * destination register. */
     if (CALLSIGNATURE_is_exception_TEST(call_object)) {
         const INTVAL raw_index = raw_args[2];
-        CTX_REG_PMC(ctx, raw_index) = 
+        CTX_REG_PMC(ctx, raw_index) =
                 VTABLE_get_pmc_keyed_int(interp, call_object, 0);
         return NULL;
     }
@@ -1285,7 +1285,7 @@
             case PARROT_ARG_INTVAL:
                 {
                     INTVAL * const int_pointer = va_arg(args, INTVAL*);
-                    *int_pointer = 
+                    *int_pointer =
                         VTABLE_get_integer_keyed_int(interp, call_object, positional_index);
                 }
                 positional_index++;
@@ -1293,7 +1293,7 @@
             case PARROT_ARG_FLOATVAL:
                 {
                     FLOATVAL * const float_pointer = va_arg(args, FLOATVAL*);
-                    *float_pointer = 
+                    *float_pointer =
                         VTABLE_get_number_keyed_int(interp, call_object, positional_index);
                 }
                 positional_index++;
@@ -1301,7 +1301,7 @@
             case PARROT_ARG_STRING:
                 {
                     STRING ** const string_pointer = va_arg(args, STRING**);
-                    *string_pointer = 
+                    *string_pointer =
                         VTABLE_get_string_keyed_int(interp, call_object, positional_index);
                 }
                 positional_index++;
@@ -1309,7 +1309,7 @@
             case PARROT_ARG_PMC:
                 {
                     PMC ** const pmc_pointer = va_arg(args, PMC**);
-                    *pmc_pointer = 
+                    *pmc_pointer =
                         VTABLE_get_pmc_keyed_int(interp, call_object, positional_index);
                 }
                 positional_index++;
@@ -1524,21 +1524,24 @@
         switch (PARROT_ARG_TYPE_MASK_MASK(return_flags)) {
             case PARROT_ARG_INTVAL:
                 if (Parrot_str_equal(interp, item_sig, CONST_STRING(interp, "P"))) {
-                    VTABLE_set_pmc(interp, result_item, pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Integer)));
+                    VTABLE_set_pmc(interp, result_item, pmc_new(
+                        interp, Parrot_get_ctx_HLL_type(interp, enum_class_Integer)));
                 }
                 VTABLE_set_integer_native(interp, result_item, va_arg(args, INTVAL));
                 return_list_index++;
                 break;
             case PARROT_ARG_FLOATVAL:
                 if (Parrot_str_equal(interp, item_sig, CONST_STRING(interp, "P"))) {
-                    VTABLE_set_pmc(interp, result_item, pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float)));
+                    VTABLE_set_pmc(interp, result_item, pmc_new(
+                        interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float)));
                 }
                 VTABLE_set_number_native(interp, result_item, va_arg(args, FLOATVAL));
                 return_list_index++;
                 break;
             case PARROT_ARG_STRING:
                 if (Parrot_str_equal(interp, item_sig, CONST_STRING(interp, "P"))) {
-                    VTABLE_set_pmc(interp, result_item, pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_String)));
+                    VTABLE_set_pmc(interp, result_item, pmc_new(
+                        interp, Parrot_get_ctx_HLL_type(interp, enum_class_String)));
                 }
                 VTABLE_set_string_native(interp, result_item,
                         Parrot_str_new_COW(interp, va_arg(args, STRING *)));

Modified: branches/pcc_reapply/src/ops/core.ops
==============================================================================
--- branches/pcc_reapply/src/ops/core.ops	Thu Oct  1 00:00:39 2009	(r41585)
+++ branches/pcc_reapply/src/ops/core.ops	Thu Oct  1 01:28:48 2009	(r41586)
@@ -535,7 +535,7 @@
     PMC * call_sig;
     INTVAL argc;
 
-    call_sig = Parrot_pcc_build_sig_object_returns_from_op(interp, 
+    call_sig = Parrot_pcc_build_sig_object_returns_from_op(interp,
             Parrot_pcc_get_signature(interp, CURRENT_CONTEXT(interp)),
             signature, raw_returns);
     Parrot_pcc_set_signature(interp, CURRENT_CONTEXT(interp), call_sig);


More information about the parrot-commits mailing list