Tidy PerlIO::Via

[p5sagit/p5-mst-13.2.git] / makedef.pl

diff --git a/makedef.pl b/makedef.pl
index 0a1e7ed..9b1f977 100644 (file)
--- a/makedef.pl
+++ b/makedef.pl
@@ -738,6 +738,7 @@ my @layer_syms = qw(
                         PerlIOBase_error
                         PerlIOBase_fileno
                         PerlIOBase_pushed
+                        PerlIOBase_binmode
                         PerlIOBase_popped
                         PerlIOBase_read
                         PerlIOBase_setlinebuf
@@ -770,6 +771,7 @@ my @layer_syms = qw(
                         PerlIO_apply_layera
                         PerlIO_pending
                         PerlIO_push
+                        PerlIO_pop
                         PerlIO_sv_dup
                         PerlIO_perlio
 
@@ -1275,6 +1277,8 @@ foreach my $symbol (qw(
                        Perl_sv_catsv
                        Perl_sv_catpvn
                        Perl_sv_2pv
+                       nw_freeenviron
+                       Remove_Thread_Ctx
                           ))
     {
        try_symbol($symbol);