Document the DJGPP status.
[p5sagit/p5-mst-13.2.git] / makedef.pl
index 1d35103..f22b34d 100644 (file)
@@ -244,7 +244,14 @@ if ($PLATFORM eq 'win32') {
                     Perl_my_popen
                     )];
 }
-elsif ($PLATFORM eq 'wince') {
+else {
+    skip_symbols [qw(
+                    Perl_do_spawn
+                    Perl_do_spawn_nowait
+                    Perl_do_aspawn
+                    )];
+}
+if ($PLATFORM eq 'wince') {
     skip_symbols [qw(
                     PL_statusvalue_vms
                     PL_archpat_auto
@@ -738,6 +745,8 @@ my @layer_syms = qw(
                         PerlIOBase_error
                         PerlIOBase_fileno
                         PerlIOBase_pushed
+                        PerlIOBase_binmode
+                        PerlIOBase_popped
                         PerlIOBase_read
                         PerlIOBase_setlinebuf
                         PerlIOBase_unread
@@ -749,6 +758,7 @@ my @layer_syms = qw(
                         PerlIOBuf_get_ptr
                         PerlIOBuf_open
                         PerlIOBuf_pushed
+                        PerlIOBuf_popped
                         PerlIOBuf_read
                         PerlIOBuf_seek
                         PerlIOBuf_set_ptrcnt
@@ -768,6 +778,7 @@ my @layer_syms = qw(
                         PerlIO_apply_layera
                         PerlIO_pending
                         PerlIO_push
+                        PerlIO_pop
                         PerlIO_sv_dup
                         PerlIO_perlio
 
@@ -1273,6 +1284,8 @@ foreach my $symbol (qw(
                        Perl_sv_catsv
                        Perl_sv_catpvn
                        Perl_sv_2pv
+                       nw_freeenviron
+                       Remove_Thread_Ctx
                           ))
     {
        try_symbol($symbol);
@@ -1348,7 +1361,7 @@ perl_destruct
 perl_free
 perl_parse
 perl_run
-# Oddities from PerlIO 
+# Oddities from PerlIO
 PerlIO_binmode
 PerlIO_getpos
 PerlIO_init