Change 11973 by sky@sky-titanic on 2001/09/10 11:57:58

        Remove unused dTHX. Silenced another warning.

Affected files ...

... //depot/perl/perlio.c#119 edit

Differences ...

==== //depot/perl/perlio.c#119 (text) ====
Index: perl/perlio.c
--- perl/perlio.c.~1~   Mon Sep 10 06:15:05 2001
+++ perl/perlio.c       Mon Sep 10 06:15:05 2001
@@ -407,7 +407,6 @@
 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.

Reply via email to