Add the modfl_pow32_bug (anti)definition also to VOS headers.

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

diff --git a/makedef.pl b/makedef.pl
index f165a90..56008ef 100644 (file)
--- a/makedef.pl
+++ b/makedef.pl
@@ -151,9 +151,11 @@ elsif ($PLATFORM eq 'os2') {
     ($v = $]) =~ s/(\d\.\d\d\d)(\d\d)$/$1_$2/;
     $v .= '-thread' if $ARCHNAME =~ /-thread/;
     ($dll = $define{PERL_DLL}) =~ s/\.dll$//i;
+    $d = "DESCRIPTION '\@#perl5-porters\@perl.org:$v#\@ Perl interpreter, configured as $CONFIG_ARGS'";
+    $d = substr($d, 0, 249) . "...'" if length $d > 253;
     print <<"---EOP---";
 LIBRARY '$dll' INITINSTANCE TERMINSTANCE
-DESCRIPTION '\@#perl5-porters\@perl.org:$v#\@ Perl interpreter'
+$d
 STACKSIZE 32768
 CODE LOADONCALL
 DATA LOADONCALL NONSHARED MULTIPLE
@@ -547,8 +549,11 @@ my @layer_syms = qw(
                         PerlIOBase_eof
                         PerlIOBase_error
                         PerlIOBase_fileno
+                        PerlIOBase_setlinebuf
+                        PerlIOBase_pushed
+                        PerlIOBase_read
+                        PerlIOBase_unread
                         PerlIOBuf_bufsiz
-                        PerlIOBuf_fdopen
                         PerlIOBuf_fill
                         PerlIOBuf_flush
                         PerlIOBuf_get_cnt
@@ -556,15 +561,15 @@ my @layer_syms = qw(
                         PerlIOBuf_open
                         PerlIOBuf_pushed
                         PerlIOBuf_read
-                        PerlIOBuf_reopen
                         PerlIOBuf_seek
                         PerlIOBuf_set_ptrcnt
-                        PerlIOBuf_setlinebuf
                         PerlIOBuf_tell
                         PerlIOBuf_unread
                         PerlIOBuf_write
                         PerlIO_define_layer
+                        PerlIO_arg_fetch
                         PerlIO_pending
+                        PerlIO_allocate
                         PerlIO_push
                         PerlIO_unread
 );
@@ -924,8 +929,11 @@ PerlIOBuf_set_ptrcnt
 PerlIOBuf_get_cnt
 PerlIOBuf_get_ptr
 PerlIOBuf_bufsiz
-PerlIOBuf_setlinebuf
 PerlIOBase_clearerr
+PerlIOBase_setlinebuf
+PerlIOBase_pushed
+PerlIOBase_read
+PerlIOBase_unread
 PerlIOBase_error
 PerlIOBase_eof
 PerlIOBuf_tell
@@ -933,9 +941,7 @@ PerlIOBuf_seek
 PerlIOBuf_write
 PerlIOBuf_unread
 PerlIOBuf_read
-PerlIOBuf_reopen
 PerlIOBuf_open
-PerlIOBuf_fdopen
 PerlIOBase_fileno
 PerlIOBuf_pushed
 PerlIOBuf_fill
@@ -945,6 +951,8 @@ PerlIO_define_layer
 PerlIO_pending
 PerlIO_unread
 PerlIO_push
+PerlIO_allocate
+PerlIO_arg_fetch
 PerlIO_apply_layers
 perlsio_binmode
 PerlIO_binmode