This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
skip trying to constant fold an incomplete op tree
[perl5.git]
/
hv.c
diff --git
a/hv.c
b/hv.c
index
f4c819c
..
8f7dbdc
100644
(file)
--- a/
hv.c
+++ b/
hv.c
@@
-1776,7
+1776,7
@@
Perl_hv_delayfree_ent(pTHX_ HV *hv, HE *entry)
/*
=for apidoc hv_clear
/*
=for apidoc hv_clear
-Frees
the
all the elements of a hash, leaving it empty.
+Frees all the elements of a hash, leaving it empty.
The XS equivalent of C<%hash = ()>. See also L</hv_undef>.
See L</av_clear> for a note about the hash possibly being invalid on
The XS equivalent of C<%hash = ()>. See also L</hv_undef>.
See L</av_clear> for a note about the hash possibly being invalid on
@@
-3681,8
+3681,6
@@
no action occurs in this case.
void
Perl_refcounted_he_free(pTHX_ struct refcounted_he *he) {
void
Perl_refcounted_he_free(pTHX_ struct refcounted_he *he) {
-#ifdef USE_ITHREADS
-#endif
PERL_UNUSED_CONTEXT;
while (he) {
PERL_UNUSED_CONTEXT;
while (he) {
@@
-3719,8
+3717,6
@@
to this function: no action occurs and a null pointer is returned.
struct refcounted_he *
Perl_refcounted_he_inc(pTHX_ struct refcounted_he *he)
{
struct refcounted_he *
Perl_refcounted_he_inc(pTHX_ struct refcounted_he *he)
{
-#ifdef USE_ITHREADS
-#endif
PERL_UNUSED_CONTEXT;
if (he) {
HINTS_REFCNT_LOCK;
PERL_UNUSED_CONTEXT;
if (he) {
HINTS_REFCNT_LOCK;
@@
-3731,7
+3727,7
@@
Perl_refcounted_he_inc(pTHX_ struct refcounted_he *he)
}
/*
}
/*
-=for apidoc_section
COP Hint Hashes
+=for apidoc_section
$COP
=for apidoc cop_fetch_label
Returns the label attached to a cop, and stores its length in bytes into
=for apidoc cop_fetch_label
Returns the label attached to a cop, and stores its length in bytes into
@@
-3811,7
+3807,7
@@
Perl_cop_store_label(pTHX_ COP *const cop, const char *label, STRLEN len,
}
/*
}
/*
-=for apidoc_section
HV Handling
+=for apidoc_section
$HV
=for apidoc hv_assert
Check that a hash is in an internally consistent state.
=for apidoc hv_assert
Check that a hash is in an internally consistent state.