Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Adjustment to symbol lists after latest changes (by Jarkko)

p4raw-id: //depot/perl@29066
  • Loading branch information...
commit f1791e53cb2920e7259f77ab71f78f70e73e7968 1 parent 8b84d7d
@rgs rgs authored
Showing with 12 additions and 0 deletions.
  1. +11 −0 makedef.pl
  2. +1 −0  perlio.sym
View
11 makedef.pl
@@ -716,6 +716,7 @@ sub emit_symbols {
PL_sharedsv_space_mutex
PL_dollarzero_mutex
PL_hints_mutex
+ PL_perlio_mutex
PL_regdupe
Perl_dirp_dup
Perl_cx_dup
@@ -1096,6 +1097,16 @@ sub readvar {
emit_symbols \@layer_syms;
emit_symbols [qw(perlsio_binmode)];
}
+ if ($define{'USE_ITHREADS'}) {
+ emit_symbols [qw(
+ PL_perlio_mutex
+ )];
+ }
+ else {
+ skip_symbols [qw(
+ PL_perlio_mutex
+ )];
+ }
} else {
# -Uuseperlio
# Skip the PerlIO layer symbols - although
View
1  perlio.sym
@@ -23,6 +23,7 @@ PerlIO_rewind
PerlIO_setpos
PerlIO_sprintf
PerlIO_stdoutf
+PerlIO_teardown
PerlIO_tmpfile
PerlIO_ungetc
PerlIO_vprintf
Please sign in to comment.
Something went wrong with that request. Please try again.