branch master updated: restricted flag for XS parser

[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 b0f9fa8506 restricted flag for XS parser
b0f9fa8506 is described below

commit b0f9fa8506bb0c2c97bfc92cc10c29b179fe942b
Author: Gavin Smith <gavinsmith0123@gmail.com>
AuthorDate: Tue Nov 28 18:00:20 2023 +0000

    restricted flag for XS parser
    
    * tp/Texinfo/XS/parsetexi/end_line.c (parse_line_command_args)
    <@alias, @definfoenclose, @defindex, @defcodeindex>,
    * tp/Texinfo/XS/parsetexi/indices.c (enter_index_entry):
    Do nothing if global_restricted is set.
---
 ChangeLog                          | 9 +++++++++
 tp/Texinfo/XS/parsetexi/end_line.c | 8 ++++++++
 tp/Texinfo/XS/parsetexi/indices.c  | 3 +++
 3 files changed, 20 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 1852a1433f..a95aadb4da 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,12 @@
+2023-11-28  Gavin Smith <gavinsmith0123@gmail.com>
+
+       restricted flag for XS parser
+
+       * tp/Texinfo/XS/parsetexi/end_line.c (parse_line_command_args)
+       <@alias, @definfoenclose, @defindex, @defcodeindex>,
+       * tp/Texinfo/XS/parsetexi/indices.c (enter_index_entry):
+       Do nothing if global_restricted is set.
+
 2023-11-28  Gavin Smith <gavinsmith0123@gmail.com>
 
        * tp/Texinfo/XS/parsetexi/api.c (reset_parser):
diff --git a/tp/Texinfo/XS/parsetexi/end_line.c 
b/tp/Texinfo/XS/parsetexi/end_line.c
index 7bdc8fa836..a14de116bb 100644
--- a/tp/Texinfo/XS/parsetexi/end_line.c
+++ b/tp/Texinfo/XS/parsetexi/end_line.c
@@ -131,6 +131,8 @@ parse_line_command_args (ELEMENT *line_command)
     {
     case CM_alias:
       {
+        if (global_restricted)
+          break;
         /* @alias NEW = EXISTING */
         char *new = 0, *existing = 0;
         enum command_id new_cmd, existing_cmd;
@@ -208,6 +210,9 @@ parse_line_command_args (ELEMENT *line_command)
       }
     case CM_definfoenclose:
       {
+        if (global_restricted)
+          break;
+
         /* @definfoenclose phoo,//,\\ */
         char *new_command = 0, *start = 0, *end = 0;
         enum command_id new_cmd;
@@ -315,6 +320,9 @@ parse_line_command_args (ELEMENT *line_command)
     case CM_defindex:
     case CM_defcodeindex:
       {
+        if (global_restricted)
+          break;
+
         char *name = 0;
         char *p = line;
 
diff --git a/tp/Texinfo/XS/parsetexi/indices.c 
b/tp/Texinfo/XS/parsetexi/indices.c
index db664887ee..0d53d8e6bb 100644
--- a/tp/Texinfo/XS/parsetexi/indices.c
+++ b/tp/Texinfo/XS/parsetexi/indices.c
@@ -250,6 +250,9 @@ enter_index_entry (enum command_id index_type_cmd,
   INDEX_ENTRY *entry;
   TEXT ignored_chars;
 
+  if (global_restricted)
+    return;
+
   idx = index_of_command (index_type_cmd);
   if (idx->entries_number == idx->entries_space)
     {