Change 20114 by [EMAIL PROTECTED] on 2003/07/10 15:06:41
Retract #20112.
Affected files ...
... //depot/perl/embed.fnc#96 edit
... //depot/perl/embedvar.h#175 edit
... //depot/perl/intrpvar.h#130 edit
... //depot/perl/perlapi.h#97 edit
Differences ...
==== //depot/perl/embedvar.h#175 (text+w) ====
Index: perl/embedvar.h
--- perl/embedvar.h#174~20112~ Thu Jul 10 07:17:59 2003
+++ perl/embedvar.h Thu Jul 10 08:06:41 2003
@@ -215,7 +215,6 @@
#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)
@@ -519,7 +518,6 @@
#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
==== //depot/perl/intrpvar.h#130 (text) ====
Index: perl/intrpvar.h
--- perl/intrpvar.h#129~20112~ Thu Jul 10 07:17:59 2003
+++ perl/intrpvar.h Thu Jul 10 08:06:41 2003
@@ -525,8 +525,6 @@
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 */
==== //depot/perl/perlapi.h#97 (text+w) ====
Index: perl/perlapi.h
--- perl/perlapi.h#96~20112~ Thu Jul 10 07:17:59 2003
+++ perl/perlapi.h Thu Jul 10 08:06:41 2003
@@ -188,8 +188,6 @@
#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
End of Patch.
