[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