… | |
… | |
56 | XSLoader::load Coro::State, $VERSION; |
56 | XSLoader::load Coro::State, $VERSION; |
57 | } |
57 | } |
58 | |
58 | |
59 | use base 'Exporter'; |
59 | use base 'Exporter'; |
60 | |
60 | |
61 | @EXPORT_OK = qw(SAVE_DEFAV SAVE_DEFSV SAVE_ERRSV SAVE_CCTXT); |
61 | @EXPORT_OK = qw(SAVE_DEFAV SAVE_DEFSV SAVE_ERRSV SAVE_CURPM SAVE_CCTXT); |
62 | |
62 | |
63 | =item $coro = new [$coderef] [, @args...] |
63 | =item $coro = new [$coderef] [, @args...] |
64 | |
64 | |
65 | Create a new coroutine and return it. The first C<transfer> call to this |
65 | Create a new coroutine and return it. The first C<transfer> call to this |
66 | coroutine will start execution at the given coderef. If the subroutine |
66 | coroutine will start execution at the given coderef. If the subroutine |
… | |
… | |
104 | |
104 | |
105 | Constant Effect |
105 | Constant Effect |
106 | SAVE_DEFAV save/restore @_ |
106 | SAVE_DEFAV save/restore @_ |
107 | SAVE_DEFSV save/restore $_ |
107 | SAVE_DEFSV save/restore $_ |
108 | SAVE_ERRSV save/restore $@ |
108 | SAVE_ERRSV save/restore $@ |
|
|
109 | SAVE_CURPM save/restore regex contetx ($1, $2 ...) |
109 | SAVE_CCTXT save/restore C-stack (you usually want this) |
110 | SAVE_CCTXT save/restore C-stack (you usually want this) |
110 | |
111 | |
111 | These constants are not exported by default. If you don't need any extra |
112 | These constants are not exported by default. If you don't need any extra |
112 | additional state saved use C<0> as the flags value. |
113 | additional state saved use C<0> as the flags value. |
113 | |
114 | |