Index: src/ops/core.ops =================================================================== --- src/ops/core.ops (revision 45859) +++ src/ops/core.ops (working copy) @@ -746,8 +746,10 @@ PMC * except = $1; opcode_t *dest; opcode_t * const ret = expr NEXT(); - PMC * const resume = new_ret_continuation_pmc(interp, ret); + PMC * const resume = pmc_new(interp, enum_class_Continuation); + VTABLE_set_pointer(interp, resume, ret); + if (PMC_IS_NULL(except) || except->vtable->base_type != enum_class_Exception) except = Parrot_ex_build_exception(interp, EXCEPT_fatal, EXCEPTION_UNIMPLEMENTED, @@ -792,10 +794,12 @@ inline op die(in STR) :flow { opcode_t *dest; opcode_t * const ret = expr NEXT(); - PMC * const resume = new_ret_continuation_pmc(interp, ret); + PMC * const resume = pmc_new(interp, enum_class_Continuation); PMC * const exception = Parrot_ex_build_exception(interp, EXCEPT_error, CONTROL_ERROR, $1); + VTABLE_set_pointer(interp, resume, ret); + VTABLE_set_attr_str(interp, exception, Parrot_str_new_constant(interp, "resume"), resume); dest = Parrot_ex_throw_from_op(interp, exception, ret); @@ -805,11 +809,13 @@ inline op die(in PMC) :flow { opcode_t *dest; opcode_t * const ret = expr NEXT(); - PMC * const resume = new_ret_continuation_pmc(interp, ret); + PMC * const resume = pmc_new(interp, enum_class_Continuation); STRING * const msg = PMC_IS_NULL($1) ? NULL : VTABLE_get_string(interp, $1); PMC * const exception = Parrot_ex_build_exception(interp, EXCEPT_error, CONTROL_ERROR, msg); + VTABLE_set_pointer(interp, resume, ret); + VTABLE_set_attr_str(interp, exception, Parrot_str_new_constant(interp, "resume"), resume); dest = Parrot_ex_throw_from_op(interp, exception, ret); @@ -831,9 +837,11 @@ inline op exit(in INT) :flow { opcode_t *dest; opcode_t * const ret = expr NEXT(); - PMC * const resume = new_ret_continuation_pmc(interp, ret); + PMC * const resume = pmc_new(interp, enum_class_Continuation); PMC * const exception = Parrot_ex_build_exception(interp, EXCEPT_exit, $1, NULL); + VTABLE_set_pointer(interp, resume, ret); + VTABLE_set_attr_str(interp, exception, Parrot_str_new_constant(interp, "resume"), resume); VTABLE_set_integer_keyed_str(interp, exception, Index: src/pmc/retcontinuation.pmc =================================================================== --- src/pmc/retcontinuation.pmc (revision 45859) +++ src/pmc/retcontinuation.pmc (working copy) @@ -1,118 +0,0 @@ -/* -Copyright (C) 2001-2008, Parrot Foundation. -$Id$ - -=head1 NAME - -src/pmc/retcontinuation.pmc - Return Continuation - -=head1 DESCRIPTION - -C extends C. - -A return continuation is a one shot Continuation. It gets recycled immediately -after invocation. - -=head2 Methods - -=over 4 - -=cut - -*/ - -#include "parrot/oplib/ops.h" - -/* HEADERIZER HFILE: none */ -/* HEADERIZER BEGIN: static */ -/* HEADERIZER END: static */ - -pmclass RetContinuation extends Continuation auto_attrs { - -/* - -=item C - -Initializes the continuation. - -=cut - -*/ - - VTABLE void init() { - Parrot_RetContinuation_attributes * const attrs = PARROT_RETCONTINUATION(SELF); - - attrs->to_ctx = CURRENT_CONTEXT(interp); - attrs->from_ctx = PMCNULL; /* filled in during a call */ - attrs->runloop_id = 0; - attrs->seg = interp->code; - attrs->address = NULL; - } - - -/* - -=item C - -Return a new Continuation PMC with the context of SELF. Note: the returned -object is not a RetContinuation and creating a real Continuation invalidates -all RetContinuation all the way up the call chain. That is, these can't be -recycled; they persist until the GC gets at them. - -=cut - -*/ - VTABLE PMC *clone() { - invalidate_retc_context(INTERP, SELF); - return SUPER(); - } -/* - -=item C - -Transfers control to the calling context and frees the current context. - -=cut - -*/ - - VTABLE opcode_t *invoke(void *in_next) { - Parrot_Continuation_attributes *data = PARROT_CONTINUATION(SELF); - PMC *from_ctx = data->from_ctx; - PackFile_ByteCode * const seg = data->seg; - opcode_t *next = data->address; - UNUSED(in_next) - - Parrot_continuation_check(interp, SELF); - Parrot_continuation_rewind_environment(interp, SELF); - - /* recycle this PMC and make sure it doesn't get marked */ - if (!PMC_IS_NULL(from_ctx)) - Parrot_pcc_set_continuation(interp, from_ctx, NULL); - - if (INTERP->code != seg) - Parrot_switch_to_cs(INTERP, seg, 1); - - return next; - } -} - - -/* - -=back - -=head1 HISTORY - -Initial revision by sean 2002/08/04. - -=cut - -*/ - -/* - * Local variables: - * c-file-style: "parrot" - * End: - * vim: expandtab shiftwidth=4: - */ Index: src/pmc/coroutine.pmc =================================================================== --- src/pmc/coroutine.pmc (revision 45859) +++ src/pmc/coroutine.pmc (working copy) @@ -169,8 +169,10 @@ PMC *ctx = Parrot_pcc_get_signature(INTERP, caller_ctx); PMC *ccont = INTERP->current_cont; - if (ccont == NEED_CONTINUATION) - ccont = (PMC *)new_ret_continuation_pmc(INTERP, next_op); + if (ccont == NEED_CONTINUATION) { + ccont = pmc_new(interp, enum_class_Continuation); + VTABLE_set_pointer(interp, ccont, next_op); + } if (PObj_get_FLAGS(ccont) & SUB_FLAG_TAILCALL) Parrot_ex_throw_from_c_args(INTERP, NULL, CONTROL_ERROR, Index: src/pmc/continuation.pmc =================================================================== --- src/pmc/continuation.pmc (revision 45859) +++ src/pmc/continuation.pmc (working copy) @@ -78,15 +78,6 @@ SET_ATTR_address(INTERP, SELF, NULL); PObj_custom_mark_SET(SELF); - - /* PANIC("don't do that"); */ - /* - * Whenever we create a continuation, all return continuations - * up the call chain may be reused due to invoking the - * continuation. To avoid that all return continuations are - * converted to true continuations. - */ - invalidate_retc_context(INTERP, SELF); } /*if they pass in a PMC to initialize with*/ @@ -109,15 +100,6 @@ SET_ATTR_address(INTERP, SELF, address); PObj_custom_mark_SET(SELF); - - /* PANIC("don't do that"); */ - /* - * Whenever we create a continuation, all return continuations - * up the call chain may be reused due to invoking the - * continuation. To avoid that all return continuations are - * converted to true continuations. - */ - invalidate_retc_context(INTERP, SELF); } Index: src/pmc/sub.pmc =================================================================== --- src/pmc/sub.pmc (revision 45859) +++ src/pmc/sub.pmc (working copy) @@ -392,8 +392,10 @@ pc = sub->seg->base.data + sub->start_offs; INTERP->current_cont = NULL; - if (ccont == NEED_CONTINUATION) - ccont = new_ret_continuation_pmc(interp, (opcode_t *)next); + if (ccont == NEED_CONTINUATION) { + ccont = pmc_new(interp, enum_class_Continuation); + VTABLE_set_pointer(interp, ccont, next); + } PARROT_ASSERT(!PMC_IS_NULL(ccont)); @@ -421,12 +423,9 @@ PARROT_CONTINUATION(ccont)->from_ctx = context; /* if this is an outer sub, then we need to set sub->ctx - * to the new context (refcounted) and convert the - * retcontinuation to a normal continuation. */ + * to the new context (refcounted) */ if (PObj_get_FLAGS(SELF) & SUB_FLAG_IS_OUTER) { sub->ctx = context; - /* convert retcontinuation to a continuation */ - ccont->vtable = interp->vtables[enum_class_Continuation]; } /* create pad if needed Index: src/interp/inter_misc.c =================================================================== --- src/interp/inter_misc.c (revision 45859) +++ src/interp/inter_misc.c (working copy) @@ -283,9 +283,6 @@ case CURRENT_CONT: { PMC * const cont = Parrot_pcc_get_continuation(interp, CURRENT_CONTEXT(interp)); - if (!PMC_IS_NULL(cont) && cont->vtable->base_type == - enum_class_RetContinuation) - return VTABLE_clone(interp, cont); return cont; } case CURRENT_OBJECT: Index: src/sub.c =================================================================== --- src/sub.c (revision 45859) +++ src/sub.c (working copy) @@ -49,60 +49,6 @@ /* -=item C - -Returns a new C PMC, and sets address field to C
- -=cut - -*/ - -PARROT_EXPORT -PARROT_MALLOC -PARROT_CANNOT_RETURN_NULL -PMC * -new_ret_continuation_pmc(PARROT_INTERP, ARGIN_NULLOK(opcode_t *address)) -{ - ASSERT_ARGS(new_ret_continuation_pmc) - PMC* const continuation = Parrot_pmc_new(interp, enum_class_RetContinuation); - VTABLE_set_pointer(interp, continuation, address); - return continuation; -} - -/* - -=item C - -Make true Continuations from all RetContinuations up the call chain. - -=cut - -*/ - -void -invalidate_retc_context(PARROT_INTERP, ARGMOD(PMC *cont)) -{ - ASSERT_ARGS(invalidate_retc_context) - - PMC *ctx = PARROT_CONTINUATION(cont)->from_ctx; - cont = Parrot_pcc_get_continuation(interp, ctx); - - while (1) { - /* - * We stop if we encounter a true continuation, because - * if one were created, everything up the chain would have been - * invalidated earlier. - */ - if (!cont || cont->vtable != interp->vtables[enum_class_RetContinuation]) - break; - cont->vtable = interp->vtables[enum_class_Continuation]; - ctx = Parrot_pcc_get_caller_ctx(interp, ctx); - cont = Parrot_pcc_get_continuation(interp, ctx); - } -} - -/* - =item C Return namespace, name, and location of subroutine. Index: src/call/pcc.c =================================================================== --- src/call/pcc.c (revision 45859) +++ src/call/pcc.c (working copy) @@ -340,7 +340,7 @@ opcode_t *dest; UINTVAL n_regs_used[] = { 0, 0, 0, 0, 0, 0, 0, 0 }; PMC *ctx = Parrot_push_context(interp, n_regs_used); - PMC * const ret_cont = new_ret_continuation_pmc(interp, NULL); + PMC * const ret_cont = pmc_new(interp, enum_class_Continuation); Parrot_pcc_set_signature(interp, ctx, call_object); Parrot_pcc_set_continuation(interp, ctx, ret_cont); Index: MANIFEST =================================================================== --- MANIFEST (revision 45859) +++ MANIFEST (working copy) @@ -1,12 +1,13 @@ # ex: set ro: # $Id$ # -# generated by tools/dev/mk_manifest_and_skip.pl Wed Apr 21 09:32:21 2010 UT +# generated by tools/dev/mk_manifest_and_skip.pl Wed Apr 21 14:22:29 2010 UT # # See below for documentation on the format of this file. # # See docs/submissions.pod on how to recreate this file after SVN # has been told about new or deleted files. +.gitignore [] CREDITS [main]doc ChangeLog [] Configure.pl [] @@ -28,11 +29,14 @@ RESPONSIBLE_PARTIES [main]doc TODO [devel]doc VERSION [devel] +compilers/data_json/.gitignore [data_json] compilers/data_json/Defines.mak [data_json] compilers/data_json/Rules.mak [data_json] compilers/data_json/data_json.pir [data_json] +compilers/data_json/data_json/.gitignore [data_json] compilers/data_json/data_json/grammar.pg [data_json] compilers/data_json/data_json/pge2pir.tg [data_json] +compilers/imcc/.gitignore [imcc] compilers/imcc/Defines.mak [imcc] compilers/imcc/Rules.in [imcc] compilers/imcc/cfg.c [imcc] @@ -62,11 +66,14 @@ compilers/imcc/symreg.c [imcc] compilers/imcc/symreg.h [imcc] compilers/imcc/unit.h [imcc] +compilers/json/.gitignore [json] compilers/json/Defines.mak [json] compilers/json/JSON.pir [json] +compilers/json/JSON/.gitignore [json] compilers/json/JSON/grammar.pg [json] compilers/json/JSON/pge2pir.tg [json] compilers/json/Rules.mak [json] +compilers/ncigen/.gitignore [ncigen] compilers/ncigen/MAINTAINER [ncigen] compilers/ncigen/NCIGEN.TODO [ncigen] compilers/ncigen/NCIGENP6.pm [ncigen] @@ -75,6 +82,7 @@ compilers/ncigen/lib/Parrot/Test/NCIGENAST.pm [ncigen] compilers/ncigen/ncigen.pir [ncigen] compilers/ncigen/ncigen.pl [ncigen] +compilers/ncigen/src/.gitignore [ncigen] compilers/ncigen/src/NCIGENAST.pir [ncigen] compilers/ncigen/src/NCIPIR.pir [ncigen] compilers/ncigen/src/builtins/say.pir [ncigen] @@ -86,14 +94,17 @@ compilers/ncigen/t/parse_00.t [test] compilers/ncigen/t/parse_01.t [test] compilers/ncigen/t/parse_02.t [test] +compilers/nqp/.gitignore [nqp] compilers/nqp/Defines.mak [nqp] compilers/nqp/README.pod []doc compilers/nqp/Rules.mak [nqp] compilers/nqp/TODO.pod [nqp] +compilers/nqp/bootstrap/.gitignore [nqp] compilers/nqp/bootstrap/actions.pm [nqp] compilers/nqp/bootstrap/nqp.pir [nqp] compilers/nqp/bootstrap/t/harness [test] compilers/nqp/nqp.pir [nqp] +compilers/nqp/src/.gitignore [nqp] compilers/nqp/src/Grammar.pg [nqp] compilers/nqp/src/Grammar/Actions.pir [nqp] compilers/nqp/src/builtins.pir [nqp] @@ -133,17 +144,22 @@ compilers/pct/README.pod []doc compilers/pct/Rules.mak [pct] compilers/pct/src/PAST.pir [pct] +compilers/pct/src/PAST/.gitignore [pct] compilers/pct/src/PAST/Compiler.pir [pct] compilers/pct/src/PAST/Node.pir [pct] +compilers/pct/src/PCT/.gitignore [pct] compilers/pct/src/PCT/Dumper.pir [pct] compilers/pct/src/PCT/Grammar.pir [pct] compilers/pct/src/PCT/HLLCompiler.pir [pct] compilers/pct/src/PCT/Node.pir [pct] +compilers/pct/src/POST/.gitignore [pct] compilers/pct/src/POST/Compiler.pir [pct] compilers/pct/src/POST/Node.pir [pct] +compilers/pge/.gitignore [pge] compilers/pge/Defines.mak [pge] compilers/pge/P6Rule.grammar [pge] compilers/pge/PGE.pir [pge] +compilers/pge/PGE/.gitignore [pge] compilers/pge/PGE/Exp.pir [pge] compilers/pge/PGE/Match.pir [pge] compilers/pge/PGE/OPTable.pir [pge] @@ -154,6 +170,7 @@ compilers/pge/README.pod []doc compilers/pge/Rules.mak [pge] compilers/pge/STATUS [pge] +compilers/pirc/.gitignore [pirc] compilers/pirc/Defines.mak [pirc] compilers/pirc/README.pod []doc compilers/pirc/Rules.mak [pirc] @@ -201,16 +218,19 @@ compilers/pirc/src/pirsymbol.c [pirc] compilers/pirc/src/pirsymbol.h [pirc] compilers/pirc/src/piryy.h [pirc] +compilers/pirc/t/.gitignore [test] compilers/pirc/t/basic.t [test] compilers/pirc/t/harness [test] compilers/pirc/t/heredoc.t [test] compilers/pirc/t/macro.t [test] compilers/pirc/t/stmts.t [test] compilers/pirc/t/subflags.t [test] +compilers/tge/.gitignore [tge] compilers/tge/Defines.mak [tge] compilers/tge/README []doc compilers/tge/Rules.mak [tge] compilers/tge/TGE.pir [tge] +compilers/tge/TGE/.gitignore [tge] compilers/tge/TGE/Compiler.pir [tge] compilers/tge/TGE/Grammar.pir [tge] compilers/tge/TGE/Parser.pg [tge] @@ -402,6 +422,8 @@ config/inter/shlibs.pm [] config/inter/types.pm [] config/inter/yacc.pm [] +docs/.gitignore [doc] +docs/book/.gitignore [doc] docs/book/draft/README [] docs/book/draft/appa_glossary.pod [] docs/book/draft/appb_patch_submission.pod [] @@ -461,6 +483,7 @@ docs/intro.pod [doc] docs/memory_internals.pod [doc] docs/multidispatch.pod [doc] +docs/ops/.gitignore [doc] docs/optable.pod [doc] docs/overview.pod [doc] docs/parrot.pod [doc] @@ -533,6 +556,7 @@ docs/user/pir/objects.pod [doc] docs/user/pir/pmcs.pod [doc] docs/vtables.pod [doc] +editor/.gitignore [] editor/README.pod []doc editor/filetype_parrot.vim [] editor/indent_pir.vim [] @@ -653,19 +677,23 @@ examples/japh/japh5.pasm [examples] examples/json/postalcodes.pir [examples] examples/json/test.pir [examples] +examples/languages/abc/.gitignore [examples] examples/languages/abc/MAINTAINER [examples] examples/languages/abc/README [examples] examples/languages/abc/TODO [examples] examples/languages/abc/abc.pir [examples] examples/languages/abc/setup.pir [examples] +examples/languages/abc/src/.gitignore [examples] examples/languages/abc/src/builtins/all.pir [examples] examples/languages/abc/src/parser/actions.nqp [examples] examples/languages/abc/src/parser/grammar.nqp [examples] +examples/languages/abc/t/.gitignore [examples] examples/languages/abc/t/01-tests.t [examples] examples/languages/abc/t/abc_basic [examples] examples/languages/abc/t/abc_functions [examples] examples/languages/abc/t/abc_special_variables [examples] examples/languages/abc/t/abc_statement [examples] +examples/languages/squaak/.gitignore [examples] examples/languages/squaak/MAINTAINER [examples] examples/languages/squaak/README [examples] examples/languages/squaak/doc/tutorial_episode_1.pod [examples] @@ -681,6 +709,7 @@ examples/languages/squaak/examples/life.sq [examples] examples/languages/squaak/setup.pir [examples] examples/languages/squaak/squaak.pir [examples] +examples/languages/squaak/src/.gitignore [examples] examples/languages/squaak/src/builtins/say.pir [examples] examples/languages/squaak/src/parser/actions.pm [examples] examples/languages/squaak/src/parser/grammar.pg [examples] @@ -691,6 +720,7 @@ examples/library/md5sum.pir [examples] examples/library/ncurses_life.pir [examples] examples/library/pcre.pir [examples] +examples/mops/.gitignore [examples] examples/mops/README [examples] examples/mops/mops.c [examples] examples/mops/mops.cs [examples] @@ -702,6 +732,7 @@ examples/mops/mops.rb [examples] examples/mops/mops.scheme [examples] examples/namespace/namespace_dump.pir [examples] +examples/nci/.gitignore [examples] examples/nci/PQt.cpp [examples] examples/nci/QtHelloWorld.pasm [examples] examples/nci/QtHelloWorld.pir [examples] @@ -722,6 +753,7 @@ examples/opengl/static-triangle.pir [examples] examples/opengl/triangle.p6 [examples] examples/opengl/triangle.pir [examples] +examples/pasm/.gitignore [examples] examples/pasm/cat.pasm [examples] examples/pasm/fact.pasm [examples] examples/pasm/hello.pasm [examples] @@ -730,6 +762,7 @@ examples/past/blocktype_immediate.pir [examples] examples/past/four_plus_one.pir [examples] examples/pge/demo.pir [examples] +examples/pir/befunge/.gitignore [examples] examples/pir/befunge/Changes [examples] examples/pir/befunge/MAINTAINER [examples] examples/pir/befunge/README [examples] @@ -901,15 +934,19 @@ examples/tutorial/82_coroutine.pir [examples] examples/tutorial/83_external_libraries.pir [examples] examples/tutorial/90_writing_tests.pir [examples] +ext/.gitignore [] +ext/Parrot-Embed/.gitignore [] ext/Parrot-Embed/Build.PL [] ext/Parrot-Embed/Changes [] ext/Parrot-Embed/MANIFEST [] ext/Parrot-Embed/README []doc ext/Parrot-Embed/TODO [] +ext/Parrot-Embed/lib/Parrot/.gitignore [] ext/Parrot-Embed/lib/Parrot/Embed.pm [] ext/Parrot-Embed/lib/Parrot/Embed.xs [] ext/Parrot-Embed/lib/Parrot/Interpreter.pm [] ext/Parrot-Embed/lib/Parrot/PMC.pm [] +ext/Parrot-Embed/t/.gitignore [test] ext/Parrot-Embed/t/00-load.t [test] ext/Parrot-Embed/t/greet.pir [test] ext/Parrot-Embed/t/interp.t [test] @@ -991,6 +1028,7 @@ ext/nqp-rx/t/p6regex/rx_quantifiers [test] ext/nqp-rx/t/p6regex/rx_subrules [test] ext/nqp-rx/t/p6regex/rx_syntax [test] +include/parrot/.gitignore [main]include include/parrot/atomic.h [main]include include/parrot/atomic/fallback.h [main]include include/parrot/atomic/gcc_pcc.h [main]include @@ -1034,6 +1072,7 @@ include/parrot/oo_private.h [main]include include/parrot/op.h [main]include include/parrot/oplib.h [main]include +include/parrot/oplib/.gitignore [main]include include/parrot/packfile.h [main]include include/parrot/parrot.h [main]include include/parrot/platform_interface.h [main]include @@ -1056,11 +1095,15 @@ include/parrot/thread.h [main]include include/parrot/vtables.h [main]include include/parrot/warnings.h [main]include +include/pmc/.gitignore [main]include include/pmc/dummy [main]include +lib/.gitignore [] lib/File/Which.pm [devel]lib lib/IO/CaptureOutput.pm [] +lib/Parrot/.gitignore [devel]lib lib/Parrot/BuildUtil.pm [devel]lib lib/Parrot/Config.pm [devel]lib +lib/Parrot/Config/.gitignore [devel]lib lib/Parrot/Configure.pm [devel]lib lib/Parrot/Configure/Compiler.pm [devel]lib lib/Parrot/Configure/Data.pm [devel]lib @@ -1128,6 +1171,7 @@ lib/Parrot/Ops2pm/Base.pm [devel]lib lib/Parrot/OpsFile.pm [devel]lib lib/Parrot/OpsRenumber.pm [devel]lib +lib/Parrot/Pmc2c/.gitignore [devel]lib lib/Parrot/Pmc2c/Attribute.pm [devel]lib lib/Parrot/Pmc2c/ComposedMethod.pm [devel]lib lib/Parrot/Pmc2c/Dumper.pm [devel]lib @@ -1197,41 +1241,59 @@ lib/Pod/Simple/XHTML.pm [] lib/Pod/Simple/XMLOutStream.pm [] parrotbug [] +runtime/parrot/dynext/.gitignore [library] runtime/parrot/dynext/README []doc +runtime/parrot/include/.gitignore [library] runtime/parrot/include/README []doc runtime/parrot/include/fp_equality.pasm [library] runtime/parrot/include/hllmacros.pir [library] runtime/parrot/include/test_more.pir [library] runtime/parrot/languages/parrot/parrot.pir [library] +runtime/parrot/library/.gitignore [library] +runtime/parrot/library/CGI/.gitignore [library] runtime/parrot/library/CGI/QueryHash.pir [library] +runtime/parrot/library/Config/.gitignore [library] runtime/parrot/library/Config/JSON.pir [library] +runtime/parrot/library/Configure/.gitignore [library] runtime/parrot/library/Configure/genfile.pir [library] runtime/parrot/library/Crow.pir [library] runtime/parrot/library/Curses.pir [library] +runtime/parrot/library/Data/.gitignore [library] runtime/parrot/library/Data/Dumper.pir [library] +runtime/parrot/library/Data/Dumper/.gitignore [library] runtime/parrot/library/Data/Dumper/Base.pir [library] runtime/parrot/library/Data/Dumper/Default.pir [library] +runtime/parrot/library/Digest/.gitignore [library] runtime/parrot/library/Digest/MD5.pir [library] +runtime/parrot/library/Getopt/.gitignore [library] runtime/parrot/library/Getopt/Obj.pir [library] runtime/parrot/library/HTTP/Daemon.pir [library] runtime/parrot/library/Iter.pir [library] runtime/parrot/library/JSON.pir [library] +runtime/parrot/library/MIME/.gitignore [library] runtime/parrot/library/MIME/Base64.pir [library] +runtime/parrot/library/Math/.gitignore [library] runtime/parrot/library/Math/Rand.pir [library] +runtime/parrot/library/NCI/.gitignore [library] runtime/parrot/library/NCI/Utils.pir [library] runtime/parrot/library/OpenGL.pir [library] +runtime/parrot/library/OpenGL/.gitignore [library] runtime/parrot/library/OpenGL/Math.pir [library] runtime/parrot/library/P6object.pir [library] +runtime/parrot/library/PCT/.gitignore [library] runtime/parrot/library/PCT/README []doc +runtime/parrot/library/PGE/.gitignore [library] runtime/parrot/library/PGE/Dumper.pir [library] runtime/parrot/library/PGE/Glob.pir [library] runtime/parrot/library/PGE/Hs.pir [library] runtime/parrot/library/PGE/Perl6Grammar.pir [library] runtime/parrot/library/PGE/Text.pir [library] runtime/parrot/library/PGE/Util.pir [library] +runtime/parrot/library/Parrot/.gitignore [library] runtime/parrot/library/Parrot/Coroutine.pir [library] runtime/parrot/library/Parrot/Exception.pir [library] runtime/parrot/library/Pg.pir [library] +runtime/parrot/library/ProfTest/.gitignore [library] runtime/parrot/library/ProfTest/Matcher.nqp [library] runtime/parrot/library/ProfTest/NQPProfile.nqp [library] runtime/parrot/library/ProfTest/PIRProfile.nqp [library] @@ -1255,6 +1317,7 @@ runtime/parrot/library/SDL/StopWatch.pir [library] runtime/parrot/library/SDL/Surface.pir [library] runtime/parrot/library/SQLite3.pir [library] +runtime/parrot/library/Stream/.gitignore [library] runtime/parrot/library/Stream/Base.pir [library] runtime/parrot/library/Stream/Combiner.pir [library] runtime/parrot/library/Stream/Coroutine.pir [library] @@ -1264,22 +1327,30 @@ runtime/parrot/library/Stream/Replay.pir [library] runtime/parrot/library/Stream/Sub.pir [library] runtime/parrot/library/Stream/Writer.pir [library] +runtime/parrot/library/String/.gitignore [library] runtime/parrot/library/String/Utils.pir [library] +runtime/parrot/library/TAP/.gitignore [library] runtime/parrot/library/TAP/Formatter.pir [library] runtime/parrot/library/TAP/Harness.pir [library] runtime/parrot/library/TAP/Parser.pir [library] +runtime/parrot/library/Tcl/.gitignore [library] runtime/parrot/library/Tcl/Glob.pir [library] runtime/parrot/library/TclLibrary.pir [library] +runtime/parrot/library/Test/.gitignore [library] runtime/parrot/library/Test/Builder.pir [library] +runtime/parrot/library/Test/Builder/.gitignore [library] runtime/parrot/library/Test/Builder/Output.pir [library] runtime/parrot/library/Test/Builder/Test.pir [library] runtime/parrot/library/Test/Builder/TestPlan.pir [library] runtime/parrot/library/Test/Builder/Tester.pir [library] runtime/parrot/library/Test/Class.pir [library] runtime/parrot/library/Test/More.pir [library] +runtime/parrot/library/YAML/.gitignore [library] runtime/parrot/library/YAML/Dumper.pir [library] +runtime/parrot/library/YAML/Dumper/.gitignore [library] runtime/parrot/library/YAML/Dumper/Base.pir [library] runtime/parrot/library/YAML/Dumper/Default.pir [library] +runtime/parrot/library/YAML/Parser/.gitignore [library] runtime/parrot/library/distutils.pir [library] runtime/parrot/library/dumper.pir [library] runtime/parrot/library/libpcre.pir [library] @@ -1296,9 +1367,12 @@ runtime/parrot/library/random_lib.pir [library] runtime/parrot/library/uuid.pir [library] runtime/parrot/library/yaml_dumper.pir [library] +src/.gitignore [] +src/atomic/.gitignore [] src/atomic/gcc_x86.c [] src/atomic/sparc_v9.s [] src/byteorder.c [] +src/call/.gitignore [] src/call/args.c [] src/call/context.c [] src/call/context_accessors.c [] @@ -1307,11 +1381,13 @@ src/datatypes.c [] src/debug.c [] src/dynext.c [] +src/dynoplibs/.gitignore [] src/dynoplibs/Defines.in [] src/dynoplibs/README []doc src/dynoplibs/Rules.in [] src/dynoplibs/math.ops [] src/dynoplibs/obscure.ops [] +src/dynpmc/.gitignore [] src/dynpmc/README.pod []doc src/dynpmc/dynlexpad.pmc [] src/dynpmc/ext.pir [] @@ -1328,6 +1404,7 @@ src/extend.c [] src/frame_builder.c [] src/frame_builder.h [] +src/gc/.gitignore [] src/gc/alloc_memory.c [] src/gc/alloc_resources.c [] src/gc/api.c [] @@ -1342,9 +1419,11 @@ src/global_setup.c [] src/hash.c [] src/hll.c [] +src/interp/.gitignore [] src/interp/inter_cb.c [] src/interp/inter_create.c [] src/interp/inter_misc.c [] +src/io/.gitignore [] src/io/api.c [] src/io/buffer.c [] src/io/core.c [] @@ -1364,6 +1443,7 @@ src/main.c [] src/misc.c [] src/multidispatch.c [] +src/nci/.gitignore [] src/nci/api.c [] src/nci/core_thunks.c [] src/nci/core_thunks.nci [] @@ -1371,6 +1451,7 @@ src/nci/extra_thunks.nci [] src/nci_test.c [] src/oo.c [] +src/ops/.gitignore [] src/ops/bit.ops [] src/ops/cmp.ops [] src/ops/core.ops [] @@ -1388,6 +1469,7 @@ src/ops/var.ops [] src/packdump.c [] src/packfile.c [] +src/packfile/.gitignore [] src/packfile/pf_items.c [] src/packout.c [] src/parrot_debugger.c [] @@ -1395,6 +1477,7 @@ src/pbc_dump.c [] src/pbc_merge.c [] src/pmc.c [] +src/pmc/.gitignore [] src/pmc/addrregistry.pmc [] src/pmc/arrayiterator.pmc [] src/pmc/bigint.pmc [] @@ -1465,7 +1548,6 @@ src/pmc/resizableintegerarray.pmc [] src/pmc/resizablepmcarray.pmc [] src/pmc/resizablestringarray.pmc [] -src/pmc/retcontinuation.pmc [] src/pmc/role.pmc [] src/pmc/scalar.pmc [] src/pmc/scheduler.pmc [] @@ -1481,6 +1563,7 @@ src/pmc/undef.pmc [] src/pmc/unmanagedstruct.pmc [] src/pmc_freeze.c [] +src/runcore/.gitignore [] src/runcore/cores.c [] src/runcore/main.c [] src/runcore/profiling.c [] @@ -1488,8 +1571,10 @@ src/scheduler.c [] src/spf_render.c [] src/spf_vtable.c [] +src/string/.gitignore [] src/string/api.c [] src/string/charset.c [] +src/string/charset/.gitignore [] src/string/charset/ascii.c [] src/string/charset/ascii.h [] src/string/charset/binary.c [] @@ -1501,6 +1586,7 @@ src/string/charset/unicode.c [] src/string/charset/unicode.h [] src/string/encoding.c [] +src/string/encoding/.gitignore [] src/string/encoding/fixed_8.c [] src/string/encoding/fixed_8.h [] src/string/encoding/ucs2.c [] @@ -1519,6 +1605,7 @@ src/warnings.c [] t/README []doc t/TESTS_STATUS.pod [test] +t/benchmark/.gitignore [test] t/benchmark/benchmarks.t [test] t/codingstd/c_arg_assert.t [test] t/codingstd/c_code_coda.t [test] @@ -1552,15 +1639,19 @@ t/codingstd/svn_id.t [test] t/codingstd/tabs.t [test] t/codingstd/trailing_space.t [test] +t/compilers/imcc/.gitignore [test] +t/compilers/imcc/imcpasm/.gitignore [test] t/compilers/imcc/imcpasm/cfg.t [test] t/compilers/imcc/imcpasm/opt0.t [test] t/compilers/imcc/imcpasm/opt1.t [test] t/compilers/imcc/imcpasm/opt2.t [test] t/compilers/imcc/imcpasm/optc.t [test] t/compilers/imcc/imcpasm/pcc.t [test] +t/compilers/imcc/reg/.gitignore [test] t/compilers/imcc/reg/alloc.t [test] t/compilers/imcc/reg/spill.t [test] t/compilers/imcc/reg/spill_old.t [test] +t/compilers/imcc/syn/.gitignore [test] t/compilers/imcc/syn/clash.t [test] t/compilers/imcc/syn/const.t [test] t/compilers/imcc/syn/errors.t [test] @@ -1581,20 +1672,25 @@ t/compilers/imcc/syn/symbols.t [test] t/compilers/imcc/syn/tail.t [test] t/compilers/imcc/syn/veracity.t [test] +t/compilers/json/.gitignore [test] t/compilers/json/from_parrot.t [test] t/compilers/json/to_parrot.t [test] +t/compilers/pct/.gitignore [test] t/compilers/pct/complete_workflow.t [test] t/compilers/pct/past.t [test] t/compilers/pct/pct_hllcompiler.t [test] t/compilers/pct/post.t [test] t/compilers/pct/script.source [test] +t/compilers/pge/.gitignore [test] t/compilers/pge/00-basic.t [test] t/compilers/pge/02-match.t [test] t/compilers/pge/03-optable.t [test] t/compilers/pge/04-compile.t [test] t/compilers/pge/06-grammar.t [test] +t/compilers/pge/p5regex/.gitignore [test] t/compilers/pge/p5regex/p5rx.t [test] t/compilers/pge/p5regex/re_tests [test] +t/compilers/pge/perl6regex/.gitignore [test] t/compilers/pge/perl6regex/01-regex.t [test] t/compilers/pge/perl6regex/context.t [test] t/compilers/pge/perl6regex/rx_backtrack [test] @@ -1614,6 +1710,7 @@ t/compilers/pge/pge_text.t [test] t/compilers/pge/pge_util.t [test] t/compilers/pge/regression.t [test] +t/compilers/tge/.gitignore [test] t/compilers/tge/NoneGrammar.tg [test] t/compilers/tge/basic.t [test] t/compilers/tge/grammar.t [test] @@ -1689,8 +1786,10 @@ t/distro/file_metadata.t [test] t/distro/manifest.t [test] t/distro/meta_yml.t [test] +t/dynoplibs/.gitignore [test] t/dynoplibs/math.t [test] t/dynoplibs/obscure.t [test] +t/dynpmc/.gitignore [test] t/dynpmc/dynlexpad.t [test] t/dynpmc/foo.t [test] t/dynpmc/foo2.t [test] @@ -1699,6 +1798,7 @@ t/dynpmc/rotest.t [test] t/dynpmc/subclass_with_pir_method.t [test] t/dynpmc/subproxy.t [test] +t/examples/.gitignore [test] t/examples/catchall.t [test] t/examples/japh.t [test] t/examples/library.t [test] @@ -1714,6 +1814,7 @@ t/harness [test] t/harness.pir [test] t/include/fp_equality.t [test] +t/library/.gitignore [test] t/library/cgi_query_hash.t [test] t/library/configure.t [test] t/library/coroutine.t [test] @@ -1748,6 +1849,7 @@ t/manifest/04-alt_file.t [test] t/manifest/05-alt_skip.t [test] t/manifest/README []doc +t/native_pbc/.gitignore [test] t/native_pbc/annotations.pbc [test] t/native_pbc/header.t [test] t/native_pbc/integer.t [test] @@ -1777,6 +1879,7 @@ t/native_pbc/testdata/annotations.pir [test] t/native_pbc/testdata/number.pasm [test] t/native_pbc/testdata/string.pasm [test] +t/oo/.gitignore [test] t/oo/attributes.t [test] t/oo/composition.t [test] t/oo/inheritance.t [test] @@ -1792,6 +1895,7 @@ t/oo/root_new.t [test] t/oo/subclass.t [test] t/oo/vtableoverride.t [test] +t/op/.gitignore [test] t/op/00ff-dos.t [test] t/op/00ff-unix.t [test] t/op/01-parse_ops.t [test] @@ -1847,6 +1951,7 @@ t/op/trans.t [test] t/op/trans_old.t [test] t/op/vivify.t [test] +t/perl/.gitignore [test] t/perl/Parrot_Distribution.t [test] t/perl/Parrot_Docs.t [test] t/perl/Parrot_IO.t [test] @@ -1861,6 +1966,7 @@ t/pharness/04-Usage.t [test] t/pir/macro.t [test] t/pir/registernames.t [test] +t/pmc/.gitignore [test] t/pmc/addrregistry.t [test] t/pmc/arrayiterator.t [test] t/pmc/bigint.t [test] @@ -1949,7 +2055,6 @@ t/pmc/resizableintegerarray.t [test] t/pmc/resizablepmcarray.t [test] t/pmc/resizablestringarray.t [test] -t/pmc/retcontinuation.t [test] t/pmc/ro.t [test] t/pmc/role.t [test] t/pmc/scalar.t [test] @@ -1977,6 +2082,7 @@ t/run/README []doc t/run/exit.t [test] t/run/options.t [test] +t/src/.gitignore [test] t/src/README []doc t/src/atomic.t [test] t/src/basic.t [test] @@ -2053,7 +2159,9 @@ t/steps/inter/types-01.t [test] t/steps/inter/yacc-01.t [test] t/steps/inter/yacc-02.t [test] +t/stress/.gitignore [test] t/stress/gc.t [test] +t/tools/.gitignore [test] t/tools/dev/pmctree.t [test] t/tools/dev/searchops.t [test] t/tools/dev/searchops/samples.pm [test] Index: include/parrot/sub.h =================================================================== --- include/parrot/sub.h (revision 45859) +++ include/parrot/sub.h (working copy) @@ -172,13 +172,6 @@ /* Don't modify between HEADERIZER BEGIN / HEADERIZER END. Your changes will be lost. */ PARROT_EXPORT -PARROT_MALLOC -PARROT_CANNOT_RETURN_NULL -PMC * new_ret_continuation_pmc(PARROT_INTERP, - ARGIN_NULLOK(opcode_t *address)) - __attribute__nonnull__(1); - -PARROT_EXPORT void Parrot_capture_lex(PARROT_INTERP, ARGMOD(PMC *sub_pmc)) __attribute__nonnull__(1) __attribute__nonnull__(2) @@ -219,11 +212,6 @@ __attribute__nonnull__(1) __attribute__nonnull__(2); -void invalidate_retc_context(PARROT_INTERP, ARGMOD(PMC *cont)) - __attribute__nonnull__(1) - __attribute__nonnull__(2) - FUNC_MODIFIES(*cont); - void mark_context_start(void); void Parrot_continuation_check(PARROT_INTERP, ARGIN(const PMC *pmc)) __attribute__nonnull__(1) @@ -262,8 +250,6 @@ ARGIN_NULLOK(opcode_t *pc)) __attribute__nonnull__(1); -#define ASSERT_ARGS_new_ret_continuation_pmc __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)) @@ -283,9 +269,6 @@ #define ASSERT_ARGS_parrot_new_closure __attribute__unused__ int _ASSERT_ARGS_CHECK = (\ PARROT_ASSERT_ARG(interp) \ , PARROT_ASSERT_ARG(sub_pmc)) -#define ASSERT_ARGS_invalidate_retc_context __attribute__unused__ int _ASSERT_ARGS_CHECK = (\ - PARROT_ASSERT_ARG(interp) \ - , PARROT_ASSERT_ARG(cont)) #define ASSERT_ARGS_mark_context_start __attribute__unused__ int _ASSERT_ARGS_CHECK = (0) #define ASSERT_ARGS_Parrot_continuation_check __attribute__unused__ int _ASSERT_ARGS_CHECK = (\ PARROT_ASSERT_ARG(interp) \ Index: t/pmc/retcontinuation.t =================================================================== --- t/pmc/retcontinuation.t (revision 45859) +++ t/pmc/retcontinuation.t (working copy) @@ -1,32 +0,0 @@ -#! parrot -# Copyright (C) 2006-2008, Parrot Foundation. -# $Id$ - -=head1 NAME - -t/pmc/retcontinuation.t - test the RetContinuation PMC - -=head1 SYNOPSIS - - % prove t/pmc/retcontinuation.t - -=head1 DESCRIPTION - -Tests the RetContinuation PMC. - -=cut - -.sub main :main - .include 'test_more.pir' - - plan(1) - - new $P0, ['RetContinuation'] - ok(1, 'Instantiated a RetContinuation PMC') -.end - -# Local Variables: -# mode: pir -# fill-column: 100 -# End: -# vim: expandtab shiftwidth=4 ft=pir: Index: t/native_pbc/integer_4.pbc =================================================================== Cannot display: file marked as a binary type. svn:mime-type = application/octet-stream Index: t/native_pbc/string_4.pbc =================================================================== Cannot display: file marked as a binary type. svn:mime-type = application/octet-stream Index: t/native_pbc/annotations.pbc =================================================================== Cannot display: file marked as a binary type. svn:mime-type = application/octet-stream Index: t/native_pbc/number_4.pbc =================================================================== Cannot display: file marked as a binary type. svn:mime-type = application/octet-stream Index: t/op/gc.t =================================================================== --- t/op/gc.t (revision 45859) +++ t/op/gc.t (working copy) @@ -508,7 +508,6 @@ # coro context and invalid return continuations # this is a stripped down version of imcc/t/syn/pcc_16 -# s. also src/pmc/retcontinuation.pmc .sub coro_context_ret_continuation .const 'Sub' $P0 = "co1" Index: PBC_COMPAT =================================================================== --- PBC_COMPAT (revision 45859) +++ PBC_COMPAT (working copy) @@ -27,6 +27,7 @@ # please insert tab separated entries at the top of the list +6.7 2010.04.20 coke remove retcontinuation PMC 6.6 2010.04.17 bacek add replace op 6.5 2010.03.09 cotto remove cpu_ret op 6.4 2010.03.02 cotto remove prederef__ and reserved