… | |
… | |
322 | |
322 | |
323 | *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** |
323 | *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** |
324 | |
324 | |
325 | Coro has experimental support for cloning states. This can be used |
325 | Coro has experimental support for cloning states. This can be used |
326 | to implement a scheme-like call/cc. However, this doesn't add to the |
326 | to implement a scheme-like call/cc. However, this doesn't add to the |
327 | expressiveness in general, and is likely perl-version specific. As such, |
327 | expressiveness in general, and is likely perl-version specific (and perl |
328 | it is disabled by default. Enable it when you want to play around with |
328 | 5.12 deliberately removed support for it). As such, it is disabled by |
329 | it, but note that it isn't supported, and unlikely ever will be. It |
329 | default. Enable it when you want to play around with it, but note that it |
330 | exists mainly to prove that it could be done - if only it were useful for |
330 | isn't supported, and unlikely ever will be. It exists mainly to prove that |
331 | something. |
331 | it could be done - if only it were useful for something. |
332 | |
332 | |
333 | EOF |
333 | EOF |
334 | |
334 | |
335 | my $masturbate = $ENV{CORO_CLONE} || "n"; |
335 | my $masturbate = $ENV{CORO_CLONE} || "n"; |
336 | $masturbate = prompt ("Implement Coro::State->clone method (y/n)?", $masturbate); |
336 | $masturbate = prompt ("Implement Coro::State->clone method (y/n)?", $masturbate); |