branch master updated: * tp/Texinfo/XS/main/DocumentXS.xs (document_tree) (indices_sort_strings), tp/Texinfo/XS/main/build_perl_info.c (BUILD_PERL_DOCUMENT_ITEM, BUILD_PERL_DOCUMENT_LIST) (document_global_information): rename sv_ref to avoid false positiver reported by ppport.h as sv_ref is also exported as part of Perl API as a function. Report by Gavin.

[Patrice Dumas]

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

pertusus pushed a commit to branch master
in repository texinfo.

The following commit(s) were added to refs/heads/master by this push:
     new be6a170296 * tp/Texinfo/XS/main/DocumentXS.xs (document_tree) 
(indices_sort_strings), tp/Texinfo/XS/main/build_perl_info.c 
(BUILD_PERL_DOCUMENT_ITEM, BUILD_PERL_DOCUMENT_LIST) 
(document_global_information): rename sv_ref to avoid false positiver reported 
by ppport.h as sv_ref is also exported as part of Perl API as a function.  
Report by Gavin.
be6a170296 is described below

commit be6a1702960179e5aae9c456ff07b962a5028c7b
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Thu Jun 6 18:37:14 2024 +0200

    * tp/Texinfo/XS/main/DocumentXS.xs (document_tree)
    (indices_sort_strings), tp/Texinfo/XS/main/build_perl_info.c
    (BUILD_PERL_DOCUMENT_ITEM, BUILD_PERL_DOCUMENT_LIST)
    (document_global_information): rename sv_ref to avoid false positiver
    reported by ppport.h as sv_ref is also exported as part of Perl API as
    a function.  Report by Gavin.
---
 ChangeLog                            |  9 +++++++++
 tp/Texinfo/XS/main/DocumentXS.xs     | 12 ++++++------
 tp/Texinfo/XS/main/build_perl_info.c | 18 +++++++++---------
 3 files changed, 24 insertions(+), 15 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index f32f1219dd..aa6925a5d8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,12 @@
+2024-06-06  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/Texinfo/XS/main/DocumentXS.xs (document_tree)
+       (indices_sort_strings), tp/Texinfo/XS/main/build_perl_info.c
+       (BUILD_PERL_DOCUMENT_ITEM, BUILD_PERL_DOCUMENT_LIST)
+       (document_global_information): rename sv_ref to avoid false positiver
+       reported by ppport.h as sv_ref is also exported as part of Perl API as 
+       a function.  Report by Gavin.
+
 2024-06-06  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/Convert/HTML.pm (_convert),
diff --git a/tp/Texinfo/XS/main/DocumentXS.xs b/tp/Texinfo/XS/main/DocumentXS.xs
index 6b7d937bec..7bbe14a33c 100644
--- a/tp/Texinfo/XS/main/DocumentXS.xs
+++ b/tp/Texinfo/XS/main/DocumentXS.xs
@@ -235,9 +235,9 @@ document_tree (SV *document_in, int handler_only=0)
 
         if (!result_sv)
           {
-            SV **sv_ref = hv_fetch (document_hv, key, strlen (key), 0);
-            if (sv_ref && SvOK (*sv_ref))
-              result_sv = *sv_ref;
+            SV **sv_reference = hv_fetch (document_hv, key, strlen (key), 0);
+            if (sv_reference && SvOK (*sv_reference))
+              result_sv = *sv_reference;
           }
 
         if (result_sv)
@@ -333,9 +333,9 @@ indices_sort_strings (SV *document_in, ...)
               }
             else
               { /* retrieve previously stored result */
-                SV **sv_ref = hv_fetch (document_hv, key, strlen (key), 0);
-                if (sv_ref && SvOK (*sv_ref))
-                  result_sv = *sv_ref;
+                SV **sv_stored = hv_fetch (document_hv, key, strlen (key), 0);
+                if (sv_stored && SvOK (*sv_stored))
+                  result_sv = *sv_stored;
                 /* error out if not found?  Or rebuild? */
               }
           }
diff --git a/tp/Texinfo/XS/main/build_perl_info.c 
b/tp/Texinfo/XS/main/build_perl_info.c
index 3d5c191676..51bd37f4f5 100644
--- a/tp/Texinfo/XS/main/build_perl_info.c
+++ b/tp/Texinfo/XS/main/build_perl_info.c
@@ -1625,9 +1625,9 @@ funcname (SV *document_in) \
 \
   if (!result_sv)\
     {\
-      SV **sv_ref = hv_fetch (document_hv, key, strlen (key), 0);\
-      if (sv_ref && SvOK (*sv_ref))\
-        result_sv = *sv_ref;\
+      SV **sv_reference = hv_fetch (document_hv, key, strlen (key), 0);\
+      if (sv_reference && SvOK (*sv_reference))\
+        result_sv = *sv_reference;\
     }\
 \
   if (result_sv)\
@@ -1679,9 +1679,9 @@ funcname (SV *document_in) \
 \
   if (!result_sv)\
     {\
-      SV **sv_ref = hv_fetch (document_hv, key, strlen (key), 0);\
-      if (sv_ref && SvOK (*sv_ref))\
-        result_sv = *sv_ref;\
+      SV **sv_reference = hv_fetch (document_hv, key, strlen (key), 0);\
+      if (sv_reference && SvOK (*sv_reference))\
+        result_sv = *sv_reference;\
     }\
 \
   if (result_sv)\
@@ -1739,9 +1739,9 @@ document_global_information (SV *document_in)
 
   if (!result_sv)
     {
-      SV **sv_ref = hv_fetch (document_hv, key, strlen (key), 0);
-      if (sv_ref && SvOK (*sv_ref))
-        result_sv = *sv_ref;
+      SV **sv_reference = hv_fetch (document_hv, key, strlen (key), 0);
+      if (sv_reference && SvOK (*sv_reference))
+        result_sv = *sv_reference;
     }
 
   if (result_sv)