branch master updated: * tp/Texinfo/XS/parsetexi/api.c (store_additional_info), tp/Texinfo/XS/parsetexi/indices.c (enter_index_entry): use the "integer" extra key in extra_misc_args to pass an integer instead of a string in the extra_misc_args array. Use it for the index number.

[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 282cea962d * tp/Texinfo/XS/parsetexi/api.c (store_additional_info), 
tp/Texinfo/XS/parsetexi/indices.c (enter_index_entry): use the "integer" extra 
key in extra_misc_args to pass an integer instead of a string in the 
extra_misc_args array.  Use it for the index number.
282cea962d is described below

commit 282cea962d38b78c55de5b5f76ab1572b73da74f
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Tue Mar 7 01:11:44 2023 +0100

    * tp/Texinfo/XS/parsetexi/api.c (store_additional_info),
    tp/Texinfo/XS/parsetexi/indices.c (enter_index_entry): use the
    "integer" extra key in extra_misc_args to pass an integer instead
    of a string in the extra_misc_args array.  Use it for the index
    number.
---
 ChangeLog                         |  8 ++++++++
 tp/Texinfo/XS/parsetexi/api.c     | 11 +++++++++--
 tp/Texinfo/XS/parsetexi/indices.c |  2 +-
 3 files changed, 18 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 9fcc92d7eb..eeb839732e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2023-03-06  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/Texinfo/XS/parsetexi/api.c (store_additional_info),
+       tp/Texinfo/XS/parsetexi/indices.c (enter_index_entry): use the
+       "integer" extra key in extra_misc_args to pass an integer instead
+       of a string in the extra_misc_args array.  Use it for the index
+       number.
+
 2023-03-06  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/Convert/HTML.pm (_convert_def_line_type),
diff --git a/tp/Texinfo/XS/parsetexi/api.c b/tp/Texinfo/XS/parsetexi/api.c
index bd1d37c0ec..30fdfae01c 100644
--- a/tp/Texinfo/XS/parsetexi/api.c
+++ b/tp/Texinfo/XS/parsetexi/api.c
@@ -363,10 +363,17 @@ store_additional_info (ELEMENT *e, ASSOCIATED_INFO* a, 
char *key)
               AV *av;
               av = newAV ();
               STORE(newRV_inc ((SV *)av));
-              /* An array of strings. */
+              /* An array of strings or integers. */
               for (j = 0; j < f->contents.number; j++)
                 {
-                  if (f->contents.list[j]->text.end > 0)
+                  KEY_PAIR *k;
+                  k = lookup_extra (f->contents.list[j], "integer");
+                  if (k)
+                    {
+                      IV value = (IV) (intptr_t) k->value;
+                      av_push (av, newSViv (value));
+                    }
+                  else if (f->contents.list[j]->text.end > 0)
                     {
                       SV *sv = newSVpv_utf8 (f->contents.list[j]->text.text,
                                              f->contents.list[j]->text.end);
diff --git a/tp/Texinfo/XS/parsetexi/indices.c 
b/tp/Texinfo/XS/parsetexi/indices.c
index 10810aab5f..855c5cf916 100644
--- a/tp/Texinfo/XS/parsetexi/indices.c
+++ b/tp/Texinfo/XS/parsetexi/indices.c
@@ -308,7 +308,7 @@ enter_index_entry (enum command_id index_type_cmd,
     text_append (&e->text, idx->name);
     add_to_element_contents (index_entry, e);
     e = new_element (ET_NONE);
-    text_printf (&e->text, "%d", idx->index_number);
+    add_extra_integer (e, "integer", idx->index_number);
     add_to_element_contents (index_entry, e);
     add_extra_misc_args (element, "index_entry", index_entry);
   }