From 6f3a2bff8962a08390935b5974d219e8b377833e Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Thu, 10 Jul 2003 14:17:59 +0000 Subject: [PATCH 1/1] Argh. At least AIX builds choke because of this. p4raw-id: //depot/perl@20112 --- embedvar.h | 2 ++ intrpvar.h | 2 ++ perlapi.h | 2 ++ 3 files changed, 6 insertions(+) diff --git a/embedvar.h b/embedvar.h index dcb980a..f29bb54 100644 --- a/embedvar.h +++ b/embedvar.h @@ -215,6 +215,7 @@ #define PL_cryptseen (vTHX->Icryptseen) #define PL_cshlen (vTHX->Icshlen) #define PL_cshname (vTHX->Icshname) +#define PL_csighandlerp (vTHX->Icsighandlerp) #define PL_curcopdb (vTHX->Icurcopdb) #define PL_curstname (vTHX->Icurstname) #define PL_custom_op_descs (vTHX->Icustom_op_descs) @@ -518,6 +519,7 @@ #define PL_Icryptseen PL_cryptseen #define PL_Icshlen PL_cshlen #define PL_Icshname PL_cshname +#define PL_Icsighandlerp PL_csighandlerp #define PL_Icurcopdb PL_curcopdb #define PL_Icurstname PL_curstname #define PL_Icustom_op_descs PL_custom_op_descs diff --git a/intrpvar.h b/intrpvar.h index 6d77cec..a90ada2 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -525,6 +525,8 @@ PERLVARI(Ippid, IV, 0) PERLVARI(Ihash_seed, UV, 0) /* Hash initializer */ +PERLVAR(Icsighandlerp, Sighandler_t) + PERLVAR(IDBassertion, SV *) PERLVARI(Icv_has_eval, I32, 0) /* PL_compcv includes an entereval or similar */ diff --git a/perlapi.h b/perlapi.h index 0f56a0a..0137f7c 100644 --- a/perlapi.h +++ b/perlapi.h @@ -188,6 +188,8 @@ END_EXTERN_C #define PL_cshlen (*Perl_Icshlen_ptr(aTHX)) #undef PL_cshname #define PL_cshname (*Perl_Icshname_ptr(aTHX)) +#undef PL_csighandlerp +#define PL_csighandlerp (*Perl_Icsighandlerp_ptr(aTHX)) #undef PL_curcopdb #define PL_curcopdb (*Perl_Icurcopdb_ptr(aTHX)) #undef PL_curstname -- 1.8.3.1