Permalink
Browse files

Adjustment to symbol lists after latest changes (by Jarkko)

p4raw-id: //depot/perl@29066
  • Loading branch information...
1 parent 8b84d7d commit f1791e53cb2920e7259f77ab71f78f70e73e7968 @rgs rgs committed Oct 20, 2006
Showing with 12 additions and 0 deletions.
  1. +11 −0 makedef.pl
  2. +1 −0 perlio.sym
View
@@ -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
@@ -23,6 +23,7 @@ PerlIO_rewind
PerlIO_setpos
PerlIO_sprintf
PerlIO_stdoutf
+PerlIO_teardown
PerlIO_tmpfile
PerlIO_ungetc
PerlIO_vprintf

0 comments on commit f1791e5

Please sign in to comment.