summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2008-03-13 16:03:56 +0000
committerNicholas Clark <nick@ccl4.org>2008-03-13 16:03:56 +0000
commit4f58fed66d9db68b8f40235b5d930c67f7aff64e (patch)
tree169b14a252e5546fab4a79497ba323cbbfe303d6 /proto.h
parent66ceb5325074bc0232dc5b60ccb414245562ce2b (diff)
downloadperl-4f58fed66d9db68b8f40235b5d930c67f7aff64e.tar.gz
Change 33507 had a const too far (Perl_mg_dup()'s mg is assigned to).
p4raw-id: //depot/perl@33508
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/proto.h b/proto.h
index 928f34b66a..9699ccc255 100644
--- a/proto.h
+++ b/proto.h
@@ -4055,7 +4055,7 @@ PERL_CALLCONV GP* Perl_gp_dup(pTHX_ GP *const gp, CLONE_PARAMS *const param)
#define PERL_ARGS_ASSERT_GP_DUP \
assert(param)
-PERL_CALLCONV MAGIC* Perl_mg_dup(pTHX_ MAGIC *const mg, CLONE_PARAMS *const param)
+PERL_CALLCONV MAGIC* Perl_mg_dup(pTHX_ MAGIC *mg, CLONE_PARAMS *const param)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_2);
#define PERL_ARGS_ASSERT_MG_DUP \