From 5e727ab85bc3b5f68de54ebe577fb793ce289ebc Mon Sep 17 00:00:00 2001
From: Tony Cook <tony@develop-help.com>
Date: Tue, 11 Nov 2025 20:46:41 +1100
Subject: [PATCH] perlguts: the types are struct Perl_OpDumpContext * and const
 OP *

not struct OpDumpContext *, OP *.

Which I missed in the review of #22572 but found when I tried to use
it.
---
 pod/perlguts.pod | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/pod/perlguts.pod b/pod/perlguts.pod
index 47ba3a87bd88..7d7380a0fa94 100644
--- a/pod/perlguts.pod
+++ b/pod/perlguts.pod
@@ -3938,10 +3938,11 @@ I<oldop> is the previous OP optimized, whose C<op_next> points to I<o>.
 =item xop_dump
 
 This member is a pointer to a function of type
-C<void (pTHX_ OP *, struct OpDumpContext *)>. If set, this function is called
-by C<op_dump()> when dumping a custom operator of this type, after the op's
-basic fields have been printed. This function may make use of
-C<opdump_printf()> to emit additional output that may be useful for debugging.
+C<void (pTHX_ const OP *, struct Perl_OpDumpContext *)>. If set, this
+function is called by C<op_dump()> when dumping a custom operator of this
+type, after the op's basic fields have been printed. This function may make
+use of C<opdump_printf()> to emit additional output that may be useful for
+debugging.
 
 The opaque structure pointer passed in as its final argument should be passed
 directly into C<opdump_printf()>.