summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2021-02-23 09:50:44 -0700
committerJames E Keenan <jkeenan@cpan.org>2021-03-18 11:36:24 +0000
commitfb15da9c6dd883e5362a60b6059f2a54b91f41a7 (patch)
treee3e593b76b37faa74e950c1b5fbff9251970d3d4 /mg.c
parent90f6751c70f42c535b3c4694c38e8eba558835af (diff)
downloadperl-fb15da9c6dd883e5362a60b6059f2a54b91f41a7.tar.gz
mg.c: Silence compiler warning
This was generating warning: type qualifiers ignored on cast result type [-Wignored-qualifiers]
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index 3f09bb48dd..b1a036ef7b 100644
--- a/mg.c
+++ b/mg.c
@@ -2851,7 +2851,7 @@ Perl_magic_set(pTHX_ SV *sv, MAGIC *mg)
paren = mg->mg_len;
if (PL_curpm && (rx = PM_GETRE(PL_curpm))) {
setparen_got_rx:
- CALLREG_NUMBUF_STORE((REGEXP * const)rx,paren,sv);
+ CALLREG_NUMBUF_STORE((REGEXP *)rx,paren,sv);
} else {
/* Croak with a READONLY error when a numbered match var is
* set without a previous pattern match. Unless it's C<local $1>