diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-01-16 22:07:26 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-01-16 22:07:26 +0000 |
| commit | ce08f86c8b1d404b3d9fec75a102b8cd65f8766a (patch) | |
| tree | 99554dbf0369752a5ad53b5a4f7cacfeee7993f8 /embed.h | |
| parent | 8a56572fafff2f72353c07ffd8e7d0373972b8d5 (diff) | |
| download | perl-ce08f86c8b1d404b3d9fec75a102b8cd65f8766a.tar.gz | |
Provide infrastructure for PERL_ASYNC_CHECK() style safe signals.
Provides all the "cost" but no benefit yet - it is to allow cost
to be measured, and implementation experiments (just in mg.c?).
p4raw-id: //depot/perlio@8457
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -518,6 +518,7 @@ #define call_method Perl_call_method #define call_pv Perl_call_pv #define call_sv Perl_call_sv +#define despatch_signals Perl_despatch_signals #define eval_pv Perl_eval_pv #define eval_sv Perl_eval_sv #define get_sv Perl_get_sv @@ -1995,6 +1996,7 @@ #define call_method(a,b) Perl_call_method(aTHX_ a,b) #define call_pv(a,b) Perl_call_pv(aTHX_ a,b) #define call_sv(a,b) Perl_call_sv(aTHX_ a,b) +#define despatch_signals() Perl_despatch_signals(aTHX) #define eval_pv(a,b) Perl_eval_pv(aTHX_ a,b) #define eval_sv(a,b) Perl_eval_sv(aTHX_ a,b) #define get_sv(a,b) Perl_get_sv(aTHX_ a,b) @@ -3910,6 +3912,8 @@ #define call_pv Perl_call_pv #define Perl_call_sv CPerlObj::Perl_call_sv #define call_sv Perl_call_sv +#define Perl_despatch_signals CPerlObj::Perl_despatch_signals +#define despatch_signals Perl_despatch_signals #define Perl_eval_pv CPerlObj::Perl_eval_pv #define eval_pv Perl_eval_pv #define Perl_eval_sv CPerlObj::Perl_eval_sv |