On Sat, Sep 13, 2008 at 12:05 AM, <[EMAIL PROTECTED]> wrote: > Author: tene > Date: Fri Sep 12 21:05:37 2008 > New Revision: 31049 > > Modified: > trunk/include/parrot/exceptions.h > trunk/languages/perl6/src/builtins/control.pir > trunk/languages/perl6/src/parser/actions.pm > trunk/languages/perl6/t/spectest_regression.data > > Log: > [rakudo] > * First draft of gather/take > > > Modified: trunk/include/parrot/exceptions.h > ============================================================================== > --- trunk/include/parrot/exceptions.h (original) > +++ trunk/include/parrot/exceptions.h Fri Sep 12 21:05:37 2008 > @@ -87,7 +87,8 @@ > CONTROL_OK, > CONTROL_BREAK, > CONTROL_CONTINUE, > - CONTROL_ERROR > + CONTROL_ERROR, > + CONTROL_TAKE > } exception_type_enum;
Tcl can currently deal with OK, CONTINUE, BREAK, ERROR, and RETURN. What's TAKE? -- Will "Coke" Coleda