Change 11531 by jhi@alpha on 2001/08/01 12:46:43
Retract #11530 (the dTHX is needed under threads)
Affected files ...
... //depot/perl/perlio.c#115 edit
Differences ...
==== //depot/perl/perlio.c#115 (text) ====
Index: perl/perlio.c
--- perl/perlio.c.~1~ Wed Aug 1 07:00:05 2001
+++ perl/perlio.c Wed Aug 1 07:00:05 2001
@@ -407,6 +407,7 @@
void
PerlIO_list_push(PerlIO_list_t *list,PerlIO_funcs *funcs,SV *arg)
{
+ dTHX;
PerlIO_pair_t *p;
if (list->cur >= list->len)
{
End of Patch.
