diff options
| author | Steve Peters <steve@fisharerojo.org> | 2006-05-21 03:47:18 +0000 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2006-05-21 03:47:18 +0000 |
| commit | d070ff45303f31f7ea3c355a42984d1c652a0faf (patch) | |
| tree | 38b23b702884db356cfbc7066e710a66472c1b23 | |
| parent | ea7d701d8a9efe1ba3e2127e0a97460c9f0c134c (diff) | |
| download | perl-d070ff45303f31f7ea3c355a42984d1c652a0faf.tar.gz | |
Add Perl_PerlIO_context_layers() to the public API to fix Win32 builds.
Also, picked up a missed change for pod/perlapi.pod.
p4raw-id: //depot/perl@28264
| -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 |