Commit e1ce526817 for perl
commit e1ce526817b901966b62a399d35d1b0d077ab605
Author: Karl Williamson <khw@cpan.org>
Date: Tue Sep 8 08:41:03 2026 -0600
Remove deprecated function get_opargs
This has been deprecated since 5.38
diff --git a/embed.fnc b/embed.fnc
index b035568b33..99b1c04001 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1542,7 +1542,6 @@ MTp |int |get_extended_os_errno
p |void |get_hash_seed |NN unsigned char * const seed_buffer
AOdp |HV * |get_hv |NN const char *name \
|I32 flags
-DPRp |U32 * |get_opargs
ADPRdp |char **|get_op_descs
ADPRdp |char **|get_op_names
CDPRp |PPADDR_t *|get_ppaddr
diff --git a/embed.h b/embed.h
index 17e6f5e47b..f4d68059b3 100644
--- a/embed.h
+++ b/embed.h
@@ -1058,7 +1058,6 @@
# define force_locale_unlock() Perl_force_locale_unlock(aTHX)
# define free_tied_hv_pool() Perl_free_tied_hv_pool(aTHX)
# define get_hash_seed(a) Perl_get_hash_seed(aTHX_ a)
-# define get_opargs() Perl_get_opargs(aTHX)
# define gv_override(a,b) Perl_gv_override(aTHX_ a,b)
# define gv_setref(a,b) Perl_gv_setref(aTHX_ a,b)
# define gv_try_downgrade(a) Perl_gv_try_downgrade(aTHX_ a)
diff --git a/proto.h b/proto.h
index c3c80b8b72..d72c9272b7 100644
--- a/proto.h
+++ b/proto.h
@@ -2144,17 +2144,6 @@ Perl_get_op_names(pTHX)
STMT_START { Perl_assert_aTHX; PERL_UNUSED_CONTEXT_FOR_ARGS_ASSERT; \
} STMT_END
-PERL_CALLCONV U32 *
-Perl_get_opargs(pTHX)
- Perl_attribute_nonnull_aTHX
- __attribute__deprecated__
- __attribute__warn_unused_result__
- __attribute__pure__
- __attribute__visibility__("hidden");
-#define PERL_ARGS_ASSERT_GET_OPARGS \
- STMT_START { Perl_assert_aTHX; PERL_UNUSED_CONTEXT_FOR_ARGS_ASSERT; \
- } STMT_END
-
PERL_CALLCONV PPADDR_t *
Perl_get_ppaddr(pTHX)
Perl_attribute_nonnull_aTHX
diff --git a/util.c b/util.c
index 2971197219..6ad012d914 100644
--- a/util.c
+++ b/util.c
@@ -3755,14 +3755,6 @@ Perl_get_op_descs(pTHX)
return (char **)PL_op_desc;
}
-U32 *
-Perl_get_opargs(pTHX)
-{
- PERL_ARGS_ASSERT_GET_OPARGS; /* Deprecated since 5.38 */
-
- return (U32 *)PL_opargs;
-}
-
PPADDR_t*
Perl_get_ppaddr(pTHX)
{