summaryrefslogtreecommitdiff
path: root/dist
diff options
context:
space:
mode:
authorLeon Timmermans <fawaka@gmail.com>2023-03-16 21:48:41 +0100
committerLeon Timmermans <fawaka@gmail.com>2023-03-18 21:11:42 +0100
commit7e782439cfcb8fc251201ee657e2e330ba944500 (patch)
tree3c521b5c132ecf3910336b9da0ce5b05c3dca530 /dist
parent4e0f29b2722407db1a7a662bb226850576c7aca4 (diff)
downloadperl-7e782439cfcb8fc251201ee657e2e330ba944500.tar.gz
Mark vtbl argument in sv_unmagicext const in PPPort as well
Diffstat (limited to 'dist')
-rw-r--r--dist/Devel-PPPort/parts/embed.fnc2
-rw-r--r--dist/Devel-PPPort/parts/inc/magic2
2 files changed, 2 insertions, 2 deletions
diff --git a/dist/Devel-PPPort/parts/embed.fnc b/dist/Devel-PPPort/parts/embed.fnc
index 90d44b6bd1..72aba78d51 100644
--- a/dist/Devel-PPPort/parts/embed.fnc
+++ b/dist/Devel-PPPort/parts/embed.fnc
@@ -1943,7 +1943,7 @@ Apd |bool |sv_streq_flags |NULLOK SV* sv1|NULLOK SV* sv2|const U32 flags
CpMdb |void |sv_taint |NN SV* sv
CpdR |bool |sv_tainted |NN SV *const sv
Apd |int |sv_unmagic |NN SV *const sv|const int type
-Apd |int |sv_unmagicext |NN SV *const sv|const int type|NULLOK MGVTBL *vtbl
+Apd |int |sv_unmagicext |NN SV *const sv|const int type|NULLOK const MGVTBL *vtbl
ApdMb |void |sv_unref |NN SV* sv
Apd |void |sv_unref_flags |NN SV *const ref|const U32 flags
Cpd |void |sv_untaint |NN SV *const sv
diff --git a/dist/Devel-PPPort/parts/inc/magic b/dist/Devel-PPPort/parts/inc/magic
index 806aa18265..4772ab3c4d 100644
--- a/dist/Devel-PPPort/parts/inc/magic
+++ b/dist/Devel-PPPort/parts/inc/magic
@@ -211,7 +211,7 @@ mg_findext(const SV * sv, int type, const MGVTBL *vtbl) {
#if { NEED sv_unmagicext }
int
-sv_unmagicext(pTHX_ SV *const sv, const int type, MGVTBL *vtbl)
+sv_unmagicext(pTHX_ SV *const sv, const int type, const MGVTBL *vtbl)
{
MAGIC* mg;
MAGIC** mgp;