[svn:parrot] r40943 - in branches/kill_parrot_cont: include/parrot src src/pmc
cotto at svn.parrot.org
cotto at svn.parrot.org
Thu Sep 3 03:46:13 UTC 2009
Author: cotto
Date: Thu Sep 3 03:46:08 2009
New Revision: 40943
URL: https://trac.parrot.org/parrot/changeset/40943
Log:
[codingstds] rerun headerizer and fix some codingstd nits
Modified:
branches/kill_parrot_cont/include/parrot/sub.h
branches/kill_parrot_cont/src/pmc/continuation.pmc
branches/kill_parrot_cont/src/sub.c
Modified: branches/kill_parrot_cont/include/parrot/sub.h
==============================================================================
--- branches/kill_parrot_cont/include/parrot/sub.h Thu Sep 3 02:26:54 2009 (r40942)
+++ branches/kill_parrot_cont/include/parrot/sub.h Thu Sep 3 03:46:08 2009 (r40943)
@@ -223,20 +223,16 @@
FUNC_MODIFIES(* ctx);
void mark_context_start(void);
-
void Parrot_capture_lex(PARROT_INTERP, ARGMOD(PMC *sub_pmc))
__attribute__nonnull__(1)
__attribute__nonnull__(2)
FUNC_MODIFIES(*sub_pmc);
-void Parrot_continuation_check(PARROT_INTERP,
- ARGIN(const PMC *pmc))
+void Parrot_continuation_check(PARROT_INTERP, ARGIN(const PMC *pmc))
__attribute__nonnull__(1)
__attribute__nonnull__(2);
-
-void Parrot_continuation_rewind_environment(PARROT_INTERP,
- ARGIN(PMC *pmc))
+void Parrot_continuation_rewind_environment(PARROT_INTERP, ARGIN(PMC *pmc))
__attribute__nonnull__(1)
__attribute__nonnull__(2);
@@ -274,10 +270,6 @@
PARROT_ASSERT_ARG(interp) \
|| PARROT_ASSERT_ARG(ctx)
#define ASSERT_ARGS_mark_context_start __attribute__unused__ int _ASSERT_ARGS_CHECK = 0
-#define ASSERT_ARGS_new_continuation __attribute__unused__ int _ASSERT_ARGS_CHECK = \
- PARROT_ASSERT_ARG(interp)
-#define ASSERT_ARGS_new_ret_continuation __attribute__unused__ int _ASSERT_ARGS_CHECK = \
- PARROT_ASSERT_ARG(interp)
#define ASSERT_ARGS_Parrot_capture_lex __attribute__unused__ int _ASSERT_ARGS_CHECK = \
PARROT_ASSERT_ARG(interp) \
|| PARROT_ASSERT_ARG(sub_pmc)
Modified: branches/kill_parrot_cont/src/pmc/continuation.pmc
==============================================================================
--- branches/kill_parrot_cont/src/pmc/continuation.pmc Thu Sep 3 02:26:54 2009 (r40942)
+++ branches/kill_parrot_cont/src/pmc/continuation.pmc Thu Sep 3 03:46:08 2009 (r40943)
@@ -92,7 +92,7 @@
/*if they pass in a PMC to initialize with*/
VTABLE void init_pmc(PMC *values) {
Parrot_Continuation_attributes *attrs = PARROT_CONTINUATION(SELF);
-
+
attrs->to_ctx = PARROT_CONTINUATION(values)->to_ctx;
attrs->from_ctx = Parrot_context_ref(interp, CONTEXT(interp));
attrs->runloop_id = 0;
@@ -113,7 +113,7 @@
invalidate_retc_context(INTERP, SELF);
}
-
+
/*
@@ -128,8 +128,8 @@
VTABLE void mark() {
Parrot_Continuation_attributes *cc = PARROT_CONTINUATION(SELF);
- if(cc->seg)
- Parrot_gc_mark_PObj_alive(interp, (PObj *)cc->seg);
+ if (cc->seg)
+ Parrot_gc_mark_PObj_alive(interp, (PObj *)cc->seg);
if (cc->to_ctx)
mark_context(INTERP, cc->to_ctx);
Modified: branches/kill_parrot_cont/src/sub.c
==============================================================================
--- branches/kill_parrot_cont/src/sub.c Thu Sep 3 02:26:54 2009 (r40942)
+++ branches/kill_parrot_cont/src/sub.c Thu Sep 3 03:46:08 2009 (r40943)
@@ -528,7 +528,7 @@
/*
-=item C<void Parrot_continuation_check(PARROT_INTERP, const PMC *pmc>
+=item C<void Parrot_continuation_check(PARROT_INTERP, const PMC *pmc)>
Verifies that the provided continuation is sane.
@@ -557,7 +557,7 @@
/*
-=item C<void Parrot_continuation_rewind_environment(PARROT_INTERP, PMC *pmc>
+=item C<void Parrot_continuation_rewind_environment(PARROT_INTERP, PMC *pmc)>
Restores the appropriate context for the continuation.
More information about the parrot-commits
mailing list