… | |
… | |
59 | |
59 | |
60 | print <<EOF; |
60 | print <<EOF; |
61 | |
61 | |
62 | *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** |
62 | *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** |
63 | |
63 | |
64 | Coro::Multicore cna do some simple checks to make sure perlinterp_release |
64 | Coro::Multicore can do some simple checks to make sure perlinterp_release |
65 | is called only with a valid perl context, and perlinterp_acquire without, |
65 | is called only with a valid perl context, and perlinterp_acquire without, |
66 | ensuring that they are always called in proper pairs. This is very useful |
66 | ensuring that they are always called in proper pairs. This is very useful |
67 | for development of your XS module. |
67 | for development of your XS module. |
68 | |
68 | |
69 | This costs a bit of performance though, so it is disabled by default. |
69 | This costs a bit of performance though, so it is disabled by default. |
70 | |
70 | |
71 | The environment variable CORO_MULTICORE_CHECK can be used to ste a |
71 | The environment variable CORO_MULTICORE_CHECK can be used to set a |
72 | default for this answer. |
72 | default for this answer. |
73 | |
73 | |
74 | EOF |
74 | EOF |
75 | |
75 | |
76 | my $extra = prompt ("Enable extra checks?", $ENV{CORO_MULTICORE_CHECK} ? "y" : "n") =~ /[Yy]/; |
76 | my $extra = prompt ("Enable extra checks?", $ENV{CORO_MULTICORE_CHECK} ? "y" : "n") =~ /[Yy]/; |