diff options
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/context/lua/mtxrun.lua | 11 | ||||
-rw-r--r-- | scripts/context/stubs/mswin/mtxrun.lua | 11 | ||||
-rw-r--r-- | scripts/context/stubs/unix/mtxrun | 11 |
3 files changed, 27 insertions, 6 deletions
diff --git a/scripts/context/lua/mtxrun.lua b/scripts/context/lua/mtxrun.lua index abd4f964c..d0cf3d46d 100644 --- a/scripts/context/lua/mtxrun.lua +++ b/scripts/context/lua/mtxrun.lua @@ -6693,7 +6693,9 @@ local function handle_any_entity(str) if resolve then local a = acache[str] -- per instance ! todo if not a then +print(">1",str,a) a = resolve_predefined and predefined_simplified[str] +print(">2",str,a) if a then -- one of the predefined elseif type(resolve) == "function" then @@ -6701,15 +6703,20 @@ local function handle_any_entity(str) else a = entities[str] end +print(">3",str,a) if a then if type(a) == "function" then - report_xml("expanding entity &%s; (function)",str) + if trace_entities then + report_xml("expanding entity &%s; (function)",str) + end a = a(str) or "" end +print(">4",str,a) + a = lpegmatch(parsedentity,a) or a +print(">5",str,a) if trace_entities then report_xml("resolved entity &%s; -> %s (internal)",str,a) end - a = lpegmatch(parsedentity,a) or a else local unknown_any_entity = placeholders.unknown_any_entity if unknown_any_entity then diff --git a/scripts/context/stubs/mswin/mtxrun.lua b/scripts/context/stubs/mswin/mtxrun.lua index abd4f964c..d0cf3d46d 100644 --- a/scripts/context/stubs/mswin/mtxrun.lua +++ b/scripts/context/stubs/mswin/mtxrun.lua @@ -6693,7 +6693,9 @@ local function handle_any_entity(str) if resolve then local a = acache[str] -- per instance ! todo if not a then +print(">1",str,a) a = resolve_predefined and predefined_simplified[str] +print(">2",str,a) if a then -- one of the predefined elseif type(resolve) == "function" then @@ -6701,15 +6703,20 @@ local function handle_any_entity(str) else a = entities[str] end +print(">3",str,a) if a then if type(a) == "function" then - report_xml("expanding entity &%s; (function)",str) + if trace_entities then + report_xml("expanding entity &%s; (function)",str) + end a = a(str) or "" end +print(">4",str,a) + a = lpegmatch(parsedentity,a) or a +print(">5",str,a) if trace_entities then report_xml("resolved entity &%s; -> %s (internal)",str,a) end - a = lpegmatch(parsedentity,a) or a else local unknown_any_entity = placeholders.unknown_any_entity if unknown_any_entity then diff --git a/scripts/context/stubs/unix/mtxrun b/scripts/context/stubs/unix/mtxrun index abd4f964c..d0cf3d46d 100644 --- a/scripts/context/stubs/unix/mtxrun +++ b/scripts/context/stubs/unix/mtxrun @@ -6693,7 +6693,9 @@ local function handle_any_entity(str) if resolve then local a = acache[str] -- per instance ! todo if not a then +print(">1",str,a) a = resolve_predefined and predefined_simplified[str] +print(">2",str,a) if a then -- one of the predefined elseif type(resolve) == "function" then @@ -6701,15 +6703,20 @@ local function handle_any_entity(str) else a = entities[str] end +print(">3",str,a) if a then if type(a) == "function" then - report_xml("expanding entity &%s; (function)",str) + if trace_entities then + report_xml("expanding entity &%s; (function)",str) + end a = a(str) or "" end +print(">4",str,a) + a = lpegmatch(parsedentity,a) or a +print(">5",str,a) if trace_entities then report_xml("resolved entity &%s; -> %s (internal)",str,a) end - a = lpegmatch(parsedentity,a) or a else local unknown_any_entity = placeholders.unknown_any_entity if unknown_any_entity then |