[8393] parsetexi update

[gavinsmith0123]

Revision: 8393
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=8393
Author:   gavin
Date:     2018-10-24 11:09:25 -0400 (Wed, 24 Oct 2018)
Log Message:
-----------
parsetexi update

Modified Paths:
--------------
    trunk/tp/Texinfo/XS/parsetexi/Parsetexi.pm
    trunk/tp/Texinfo/XS/parsetexi/end_line.c

Modified: trunk/tp/Texinfo/XS/parsetexi/Parsetexi.pm
===================================================================
--- trunk/tp/Texinfo/XS/parsetexi/Parsetexi.pm  2018-10-24 14:43:00 UTC (rev 
8392)
+++ trunk/tp/Texinfo/XS/parsetexi/Parsetexi.pm  2018-10-24 15:09:25 UTC (rev 
8393)
@@ -59,6 +59,7 @@
 
 # Copied from Parser.pm
 # Customization variables obeyed by the Parser, and the default values.
+# TODO: delete these, as they are not used by the XS module itself.
 our %default_customization_values = (
   'TEST' => 0,
   'DEBUG' => 0,     # if >= 10, tree is printed in texi2any.pl after parsing.

Modified: trunk/tp/Texinfo/XS/parsetexi/end_line.c
===================================================================
--- trunk/tp/Texinfo/XS/parsetexi/end_line.c    2018-10-24 14:43:00 UTC (rev 
8392)
+++ trunk/tp/Texinfo/XS/parsetexi/end_line.c    2018-10-24 15:09:25 UTC (rev 
8393)
@@ -1827,7 +1827,7 @@
   /* If a file was included, remove the include command completely.
      Also ignore @setfilename in included file, as said in the manual. */
   if (included_file || (cmd == CM_setfilename && top_file_index () > 0))
-    destroy_element (pop_element_from_contents (current));
+    destroy_element_and_children (pop_element_from_contents (current));
 
   /* 3350 */
   else if (cmd == CM_setfilename && (current_node || current_section))