Change 13626: We need DWIM cpps.

[Jarkko Hietaniemi]

Change 13626 by jhi@alpha on 2001/12/11 15:55:51

        We need DWIM cpps.

Affected files ...

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

Differences ...

==== //depot/perl/perlio.c#148 (text) ====
Index: perl/perlio.c
--- perl/perlio.c.~1~   Tue Dec 11 09:00:06 2001
+++ perl/perlio.c       Tue Dec 11 09:00:06 2001
@@ -861,10 +861,10 @@
     PerlIO_funcs *tab = &PerlIO_perlio;
 #ifdef PERLIO_CRLF
     tab = &PerlIO_crlf;
-#endif
+#else
     if (PerlIO_stdio.Set_ptrcnt)
         tab = &PerlIO_stdio;
-#else
+#endif
     PerlIO_debug("Pushing %s\n", tab->name);
     PerlIO_list_push(aTHX_ av, PerlIO_find_layer(aTHX_ tab->name, 0, 0),
                     &PL_sv_undef);
End of Patch.