[no subject]

[Patrice Dumas]

branch: master
commit 291647537f9ce3e7ce7832a480fe7b55fe9b8503
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Fri Nov 15 20:24:39 2024 +0100

    * tp/Texinfo/XS/main/api_to_perl.c (get_refcount): call dTHX.
---
 ChangeLog                        | 4 ++++
 tp/Texinfo/XS/main/api_to_perl.c | 2 ++
 2 files changed, 6 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 10f160998e..e49ea3dde1 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -16,6 +16,10 @@
        * tp/tests/many_input_files/Makefile.am: update rules to
        copy output directories in their escaped form.
 
+2024-11-15  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/Texinfo/XS/main/api_to_perl.c (get_refcount): call dTHX.
+
 2024-11-15  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/XS/Makefile.am (libxsutils_la_CPPFLAGS)
diff --git a/tp/Texinfo/XS/main/api_to_perl.c b/tp/Texinfo/XS/main/api_to_perl.c
index 9a941fd133..7149e06e82 100644
--- a/tp/Texinfo/XS/main/api_to_perl.c
+++ b/tp/Texinfo/XS/main/api_to_perl.c
@@ -42,6 +42,8 @@
 int
 get_refcount (void *sv)
 {
+  dTHX;
+
   return SvREFCNT ((SV *) sv);
 }