branch master updated: * tp/texi2any.supp: Add valgrind suppression file. Add suppressions for setenv bug with perl 5.36 and earlier.

[Gavin D. Smith]

This is an automated email from the git hooks/post-receive script.

gavin pushed a commit to branch master
in repository texinfo.

The following commit(s) were added to refs/heads/master by this push:
     new 478cf6de8c * tp/texi2any.supp: Add valgrind suppression file.  Add 
suppressions for setenv bug with perl 5.36 and earlier.
478cf6de8c is described below

commit 478cf6de8cf7356e13224563d61fb76392216000
Author: Gavin Smith <gavinsmith0123@gmail.com>
AuthorDate: Thu Nov 16 20:54:36 2023 +0000

    * tp/texi2any.supp: Add valgrind suppression file.  Add
    suppressions for setenv bug with perl 5.36 and earlier.
---
 ChangeLog        |  5 +++++
 tp/Makefile.am   |  1 +
 tp/texi2any.supp | 34 ++++++++++++++++++++++++++++++++++
 3 files changed, 40 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 0e30048469..c4bfeaeab8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2023-11-16  Gavin Smith <gavinsmith0123@gmail.com>
+
+       * tp/texi2any.supp: Add valgrind suppression file.  Add
+       suppressions for setenv bug with perl 5.36 and earlier.
+
 2023-11-16  Gavin Smith <gavinsmith0123@gmail.com>
 
        * contrib/nontests/latex2html.test: Remove.
diff --git a/tp/Makefile.am b/tp/Makefile.am
index f6652ea8df..b9a106ec79 100644
--- a/tp/Makefile.am
+++ b/tp/Makefile.am
@@ -316,6 +316,7 @@ maintenance_files = \
 
 EXTRA_DIST = \
   texi2any.pl \
+  texi2any.supp \
   $(test_files_generated_list) \
   $(test_files) \
   $(tp_tests) \
diff --git a/tp/texi2any.supp b/tp/texi2any.supp
new file mode 100644
index 0000000000..03ad26eca8
--- /dev/null
+++ b/tp/texi2any.supp
@@ -0,0 +1,34 @@
+# valgrind suppression file for texi2any
+
+# Errors output due to use of setenv in XS module.  Fixed in Perl 5.38.
+# See <https://github.com/Perl/perl5/issues/19399>.
+
+{
+   before-perl-5.38/A
+   Memcheck:Free
+   fun:free
+   fun:tdestroy_recurse
+   fun:tdestroy_recurse
+   fun:tdestroy_recurse
+   fun:tdestroy
+   fun:free_mem
+   fun:__libc_freeres
+   fun:_vgnU_freeres
+   fun:__run_exit_handlers
+   fun:exit
+   fun:main
+}
+
+{
+   before-perl-5.38/B
+   Memcheck:Free
+   fun:free
+   fun:tdestroy_recurse
+   fun:tdestroy
+   fun:free_mem
+   fun:__libc_freeres
+   fun:_vgnU_freeres
+   fun:__run_exit_handlers
+   fun:exit
+   fun:main
+}