diff options
| -rw-r--r-- | embed.fnc | 2 | ||||
| -rw-r--r-- | embed.h | 2 | ||||
| -rw-r--r-- | global.sym | 1 | ||||
| -rw-r--r-- | pod/perlapi.pod | 2 |
4 files changed, 3 insertions, 4 deletions
@@ -1504,7 +1504,7 @@ Apn |int |my_socketpair |int family|int type|int protocol|int fd[2] pMXE |SV* |sv_setsv_cow |NN SV* dsv|NN SV* ssv #endif -op |const char *|PerlIO_context_layers|NULLOK const char *mode +Aop |const char *|PerlIO_context_layers|NULLOK const char *mode #if defined(USE_PERLIO) && !defined(USE_SFIO) Ap |int |PerlIO_close |NULLOK PerlIO *f @@ -3692,8 +3692,6 @@ #define sv_setsv_cow(a,b) Perl_sv_setsv_cow(aTHX_ a,b) #endif #endif -#ifdef PERL_CORE -#endif #if defined(USE_PERLIO) && !defined(USE_SFIO) #define PerlIO_close(a) Perl_PerlIO_close(aTHX_ a) #define PerlIO_fill(a) Perl_PerlIO_fill(aTHX_ a) diff --git a/global.sym b/global.sym index 88fdd63afc..c779a0495c 100644 --- a/global.sym +++ b/global.sym @@ -671,6 +671,7 @@ Perl_sv_copypv Perl_my_atof2 Perl_my_socketpair Perl_sv_setsv_cow +Perl_PerlIO_context_layers Perl_PerlIO_close Perl_PerlIO_fill Perl_PerlIO_fileno diff --git a/pod/perlapi.pod b/pod/perlapi.pod index b9eb329b71..f4af853af7 100644 --- a/pod/perlapi.pod +++ b/pod/perlapi.pod @@ -4351,7 +4351,7 @@ X<SvSTASH_set> Set the value of the STASH pointer in sv to val. See C<SvIV_set>. - void SvSTASH_set(SV* sv, STASH* val) + void SvSTASH_set(SV* sv, HV* val) =for hackers Found in file sv.h |