}
}
-unless ($PLATFORM eq 'vms') {
- skip_symbols [qw(PL_my_inv_rand_max)];
-}
-
if ($PLATFORM eq 'win32') {
skip_symbols [qw(
PL_statusvalue_vms
PerlIOBase_eof
PerlIOBase_error
PerlIOBase_fileno
- PerlIOBase_setlinebuf
PerlIOBase_pushed
PerlIOBase_read
+ PerlIOBase_setlinebuf
PerlIOBase_unread
PerlIOBuf_bufsiz
PerlIOBuf_fill
PerlIOBuf_tell
PerlIOBuf_unread
PerlIOBuf_write
- PerlIO_define_layer
+ PerlIO_allocate
PerlIO_arg_fetch
+ PerlIO_define_layer
PerlIO_pending
- PerlIO_allocate
PerlIO_push
PerlIO_sv_dup
PerlIO_unread
+ PL_def_layerlist
+ PL_known_layers
+ PL_perlio
);
if ($define{'USE_PERLIO'}) {
win32_getpid
win32_crypt
win32_dynaload
-
+ win32_get_childenv
+ win32_free_childenv
+ win32_clearenv
+ win32_get_childdir
+ win32_free_childdir
win32_stdin
win32_stdout
win32_stderr