[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
branch master updated: tp/Texinfo/XS/main/build_perl_info.c: change/addi
From: |
Patrice Dumas |
Subject: |
branch master updated: tp/Texinfo/XS/main/build_perl_info.c: change/additions in comments |
Date: |
Sun, 29 Oct 2023 10:25:51 -0400 |
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 dfdf78d928 tp/Texinfo/XS/main/build_perl_info.c: change/additions in
comments
dfdf78d928 is described below
commit dfdf78d9284ebb4c563640c5f5d674effd36316f
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Sun Oct 29 15:25:43 2023 +0100
tp/Texinfo/XS/main/build_perl_info.c: change/additions in comments
---
tp/Texinfo/XS/main/build_perl_info.c | 13 ++++++++-----
1 file changed, 8 insertions(+), 5 deletions(-)
diff --git a/tp/Texinfo/XS/main/build_perl_info.c
b/tp/Texinfo/XS/main/build_perl_info.c
index e8d33c27b5..dfe3d8a31a 100644
--- a/tp/Texinfo/XS/main/build_perl_info.c
+++ b/tp/Texinfo/XS/main/build_perl_info.c
@@ -859,14 +859,16 @@ build_global_info (GLOBAL_INFO *global_info_ref,
if (global_info.input_directory)
hv_store (hv, "input_directory", strlen ("input_directory"),
newSVpv (global_info.input_directory, 0), 0);
+
/* duplicate information to avoid needing to use global_commands and build
- tree elements */
+ tree elements, for information useful for structuring and transformation
+ codes */
if (global_commands.novalidate)
hv_store (hv, "novalidate", strlen ("novalidate"),
newSViv (1), 0);
+
document_language = get_global_document_command (global_commands_ref,
CM_documentlanguage, CL_preamble);
-
if (document_language)
{
char *language = informative_command_value (document_language);
@@ -877,9 +879,7 @@ build_global_info (GLOBAL_INFO *global_info_ref,
return hv;
}
-/* global info that requires a built tree
- FIXME remove, use the global commands information directly?
- */
+/* global info that requires a built tree */
void
build_global_info_tree_info (HV *hv, GLOBAL_INFO *global_info_ref)
{
@@ -1075,6 +1075,9 @@ get_errors (ERROR_MESSAGE* error_list, size_t
error_number)
+/* build a minimal document, without tree/global commands/indices, only
+ with the document descriptor information, errors and information that does
+ not refer directly to tree elements */
SV *
get_document (size_t document_descriptor)
{
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- branch master updated: tp/Texinfo/XS/main/build_perl_info.c: change/additions in comments,
Patrice Dumas <=