branch master updated: * tp/Texinfo/XS/main/call_perl_function.c (call_file_id_setting_special_unit_target_file_name) (call_file_id_setting_label_target_name) (call_file_id_setting_node_file_name) (call_file_id_setting_sectioning_command_target_name) (call_file_id_setting_unit_file_name): Change G_LIST to G_ARRAY to build on older Perls.

[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 3863060fb3 * tp/Texinfo/XS/main/call_perl_function.c 
(call_file_id_setting_special_unit_target_file_name) 
(call_file_id_setting_label_target_name) (call_file_id_setting_node_file_name) 
(call_file_id_setting_sectioning_command_target_name) 
(call_file_id_setting_unit_file_name): Change G_LIST to G_ARRAY to build on 
older Perls.
3863060fb3 is described below

commit 3863060fb373dec268227c270810871b4faa4cdb
Author: Gavin Smith <gavinsmith0123@gmail.com>
AuthorDate: Fri Oct 20 19:47:19 2023 +0100

    * tp/Texinfo/XS/main/call_perl_function.c
    (call_file_id_setting_special_unit_target_file_name)
    (call_file_id_setting_label_target_name)
    (call_file_id_setting_node_file_name)
    (call_file_id_setting_sectioning_command_target_name)
    (call_file_id_setting_unit_file_name):
    Change G_LIST to G_ARRAY to build on older Perls.
---
 ChangeLog                               | 10 ++++++++++
 tp/Texinfo/XS/main/call_perl_function.c | 10 +++++-----
 2 files changed, 15 insertions(+), 5 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 37f0b347f3..6a9620ddc4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,13 @@
+2023-10-20  Gavin Smith <gavinsmith0123@gmail.com>
+
+       * tp/Texinfo/XS/main/call_perl_function.c
+       (call_file_id_setting_special_unit_target_file_name)
+       (call_file_id_setting_label_target_name)
+       (call_file_id_setting_node_file_name)
+       (call_file_id_setting_sectioning_command_target_name)
+       (call_file_id_setting_unit_file_name):
+       Change G_LIST to G_ARRAY to build on older Perls.
+
 2023-10-20  Gavin Smith <gavinsmith0123@gmail.com>
 
        * tp/Texinfo/XS/xspara.c (xspara_add_text) <delete END_SENTENCE>:
diff --git a/tp/Texinfo/XS/main/call_perl_function.c 
b/tp/Texinfo/XS/main/call_perl_function.c
index 49a7198062..950cc332e8 100644
--- a/tp/Texinfo/XS/main/call_perl_function.c
+++ b/tp/Texinfo/XS/main/call_perl_function.c
@@ -130,7 +130,7 @@ call_file_id_setting_special_unit_target_file_name 
(CONVERTER *self,
           PUSHs(sv_2mortal (newSVpv (default_filename, 0)));
           PUTBACK;
 
-          count = call_sv (*special_unit_target_file_name_sv, G_LIST);
+          count = call_sv (*special_unit_target_file_name_sv, G_ARRAY);
 
           SPAGAIN;
 
@@ -211,7 +211,7 @@ call_file_id_setting_label_target_name (CONVERTER *self,
           PUSHs(sv_2mortal (newSVpv (target, 0)));
           PUTBACK;
 
-          count = call_sv (*label_target_name_sv, G_LIST);
+          count = call_sv (*label_target_name_sv, G_ARRAY);
 
           SPAGAIN;
 
@@ -281,7 +281,7 @@ call_file_id_setting_node_file_name (CONVERTER *self,
           PUSHs(sv_2mortal (newSVpv (node_filename, 0)));
           PUTBACK;
 
-          count = call_sv (*node_file_name_sv, G_LIST);
+          count = call_sv (*node_file_name_sv, G_ARRAY);
 
           SPAGAIN;
 
@@ -367,7 +367,7 @@ call_file_id_setting_sectioning_command_target_name 
(CONVERTER *self,
           PUSHs(sv_2mortal (newSVpv (filename, 0)));
           PUTBACK;
 
-          count = call_sv (*sectioning_command_target_name_sv, G_LIST);
+          count = call_sv (*sectioning_command_target_name_sv, G_ARRAY);
 
           SPAGAIN;
 
@@ -446,7 +446,7 @@ call_file_id_setting_unit_file_name (CONVERTER *self, 
OUTPUT_UNIT *output_unit,
           PUSHs(sv_2mortal (newSVpv (filepath, 0)));
           PUTBACK;
 
-          count = call_sv (*unit_file_name_sv, G_LIST);
+          count = call_sv (*unit_file_name_sv, G_ARRAY);
 
           SPAGAIN;