summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2009-03-30 00:48:13 +0100
committerDavid Mitchell <davem@iabyn.com>2009-03-30 00:48:13 +0100
commit136f96283a398f49aa36b7d47086bf37fd04c4b4 (patch)
treefd9bd1a39aec6520a3aa6f99b526318cd91d3ef7 /sv.c
parent53519b6f1d29ac9686d0ec5edf6ad18224ba36a0 (diff)
downloadperl-136f96283a398f49aa36b7d47086bf37fd04c4b4.tar.gz
fix some 5.10.x-specific const warnings after the big MUTABLE_* merge
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/sv.c b/sv.c
index 9eb2cd50b8..235ade8bb4 100644
--- a/sv.c
+++ b/sv.c
@@ -12468,12 +12468,12 @@ S_find_uninit_var(pTHX_ OP* obase, SV* uninit_sv, bool match)
/* attempt to find a match within the aggregate */
if (hash) {
- keysv = find_hash_subscript((const HV*)sv, uninit_sv);
+ keysv = find_hash_subscript((HV*)sv, uninit_sv);
if (keysv)
subscript_type = FUV_SUBSCRIPT_HASH;
}
else {
- index = find_array_subscript((const AV *)sv, uninit_sv);
+ index = find_array_subscript((AV *)sv, uninit_sv);
if (index >= 0)
subscript_type = FUV_SUBSCRIPT_ARRAY;
}
@@ -12590,14 +12590,14 @@ S_find_uninit_var(pTHX_ OP* obase, SV* uninit_sv, bool match)
/* index is an expression;
* attempt to find a match within the aggregate */
if (obase->op_type == OP_HELEM) {
- SV * const keysv = find_hash_subscript((const HV*)sv, uninit_sv);
+ SV * const keysv = find_hash_subscript((HV*)sv, uninit_sv);
if (keysv)
return varname(gv, '%', o->op_targ,
keysv, 0, FUV_SUBSCRIPT_HASH);
}
else {
const I32 index
- = find_array_subscript((const AV *)sv, uninit_sv);
+ = find_array_subscript((AV *)sv, uninit_sv);
if (index >= 0)
return varname(gv, '@', o->op_targ,
NULL, index, FUV_SUBSCRIPT_ARRAY);