diff options
| author | Nicholas Clark <nick@ccl4.org> | 2010-11-09 15:40:59 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2010-11-09 16:19:14 +0000 |
| commit | 282b29ee4859384c5da0d13a238cc0d52b072e3a (patch) | |
| tree | 2477a959e9bcf247aa59167a0d73b0b6fc55e17d /embed.fnc | |
| parent | dd56ec38a36f4ba9784fbc0c3d5b53d795977d64 (diff) | |
| download | perl-282b29ee4859384c5da0d13a238cc0d52b072e3a.tar.gz | |
Change S_doopen_pm() and S_check_type_and_open() to take an SV parameter.
Previously S_doopen_pm() took a char */STRLEN pair, but it happened that the
pointer was always from an SV. So pass the SV directly.
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1661,9 +1661,9 @@ sR |I32 |dopoptosub_at |NN const PERL_CONTEXT* cxstk|I32 startingblock sR |I32 |dopoptowhen |I32 startingblock s |void |save_lines |NULLOK AV *array|NN SV *sv s |bool |doeval |int gimme|NULLOK OP** startop|NULLOK CV* outside|U32 seq -sR |PerlIO *|check_type_and_open|NN const char *name +sR |PerlIO *|check_type_and_open|NN SV *name #ifndef PERL_DISABLE_PMC -sR |PerlIO *|doopen_pm |NN const char *name|const STRLEN namelen +sR |PerlIO *|doopen_pm |NN SV *name #endif sRn |bool |path_is_absolute|NN const char *name sR |I32 |run_user_filter|int idx|NN SV *buf_sv|int maxlen |