In perl.git, the branch blead has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/0b1d8e2d68e53d65f46c0455f536bce7f0797bdd?hp=80a17ed4419aec102f46b22ce5ba9e9e074deffc>
- Log -----------------------------------------------------------------
commit 0b1d8e2d68e53d65f46c0455f536bce7f0797bdd
Author: Father Chrysostomos <spr...@cpan.org>
Date: Thu Aug 11 18:20:56 2016 -0700
embed.fnc: sv_copypv is still API
This commit removed the A flag, causing the documentation to move from
perlapi to perlintern:
commit 4bac9ae47b5ad7845a24e26b0e95609805de688a
Author: Chip Salzenberg <c...@pobox.com>
Date: Fri Jun 22 15:18:18 2012 -0700
Magic flags harmonization.
But it is still API, even though it is implemented as a macro (and a
mathomly function).
(This is one reason why checking in generated files can be helpful.
It avoids mistakes like this by making them more visible.)
M embed.fnc
commit 6338d1c60a3bbc09511d831c69e41da60748aca7
Author: Father Chrysostomos <spr...@cpan.org>
Date: Thu Aug 11 18:12:40 2016 -0700
mathoms.c: Restore previous behaviour of sv_copypv
This commit made it a simple wrapper around the new sv_copypv_flags:
commit 4bac9ae47b5ad7845a24e26b0e95609805de688a
Author: Chip Salzenberg <c...@pobox.com>
Date: Fri Jun 22 15:18:18 2012 -0700
Magic flags harmonization.
But in so doing it changed the behaviour of the functional version
(Perl_sv_copypv), while preserving the existing behaviour in the new
macro (sv_copypv). The latter invokes get-magic, while the former
used to but stopped doing so.
M mathoms.c
commit f672247cb0dd3e05a45c951d2be56e1700621a01
Author: Father Chrysostomos <spr...@cpan.org>
Date: Wed Aug 10 23:10:02 2016 -0700
perlinterp.pod: typoes
M pod/perlinterp.pod
-----------------------------------------------------------------------
Summary of changes:
embed.fnc | 2 +-
mathoms.c | 2 +-
pod/perlinterp.pod | 4 ++--
3 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/embed.fnc b/embed.fnc
index f2e48ab..894a511 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -2644,7 +2644,7 @@ Apd |void |sv_catsv_flags |NN SV *const
dsv|NULLOK SV *const ssv|const I32 flags
Apmd |STRLEN |sv_utf8_upgrade_flags|NN SV *const sv|const I32 flags
Ap |STRLEN |sv_utf8_upgrade_flags_grow|NN SV *const sv|const I32
flags|STRLEN extra
Apd |char* |sv_pvn_force_flags|NN SV *const sv|NULLOK STRLEN *const
lp|const I32 flags
-pmb |void |sv_copypv |NN SV *const dsv|NN SV *const ssv
+Apmb |void |sv_copypv |NN SV *const dsv|NN SV *const ssv
Apmd |void |sv_copypv_nomg |NN SV *const dsv|NN SV *const ssv
Apd |void |sv_copypv_flags |NN SV *const dsv|NN SV *const
ssv|const I32 flags
Ap |char* |my_atof2 |NN const char *s|NN NV* value
diff --git a/mathoms.c b/mathoms.c
index 880d0cd..1480186 100644
--- a/mathoms.c
+++ b/mathoms.c
@@ -1183,7 +1183,7 @@ Perl_sv_copypv(pTHX_ SV *const dsv, SV *const ssv)
{
PERL_ARGS_ASSERT_SV_COPYPV;
- sv_copypv_flags(dsv, ssv, 0);
+ sv_copypv_flags(dsv, ssv, SV_GMAGIC);
}
UV /* Made into a function, so can be deprecated */
diff --git a/pod/perlinterp.pod b/pod/perlinterp.pod
index bb559ba..5c41e29 100644
--- a/pod/perlinterp.pod
+++ b/pod/perlinterp.pod
@@ -473,11 +473,11 @@ Originally, the tree would have looked like this:
11 SVOP (0x816dcf0) gv GV (0x80fa460) *a
That is, fetch the C<a> entry from the main symbol table, and then look
-at the scalar component of it: C<gvsv> (C<pp_gvsv> into F<pp_hot.c>)
+at the scalar component of it: C<gvsv> (C<pp_gvsv> in F<pp_hot.c>)
happens to do both these things.
The right hand side, starting at line 5 is similar to what we've just
-seen: we have the C<add> op (C<pp_add> also in F<pp_hot.c>) add
+seen: we have the C<add> op (C<pp_add>, also in F<pp_hot.c>) add
together two C<gvsv>s.
Now, what's this about?
--
Perl5 Master Repository
