diff options
Diffstat (limited to 'Master/texmf-dist/tex/luatex/luatexja/luatexja.lua')
-rw-r--r-- | Master/texmf-dist/tex/luatex/luatexja/luatexja.lua | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/luatex/luatexja/luatexja.lua b/Master/texmf-dist/tex/luatex/luatexja/luatexja.lua index 59204dfdef0..8fb24a80121 100644 --- a/Master/texmf-dist/tex/luatex/luatexja/luatexja.lua +++ b/Master/texmf-dist/tex/luatex/luatexja/luatexja.lua @@ -458,6 +458,24 @@ local function debug_show_node_X(p,print_fn, limit) .. print_scaled(p.depth) .. ')x' .. print_scaled(p.width) .. ', dir=' .. tostring(node.has_attribute(p, attr_dir)) print_fn(s) + elseif pt=='disc' then + print_fn(s) + local bid = inner_depth + if inner_depth < limit then + prefix, inner_depth = k.. 'p.', inner_depth + 1 + for q in node.traverse(p.pre) do + debug_show_node_X(q, print_fn, limit) + end + prefix = k.. 'P.' + for q in node.traverse(p.post) do + debug_show_node_X(q, print_fn, limit) + end + prefix = k.. 'R.' + for q in node.traverse(p.replace) do + debug_show_node_X(q, print_fn, limit) + end + end + prefix=k elseif pt == 'glue' then s = base .. ' ' .. print_spec(p) if get_attr_icflag(p)>icflag_table.KINSOKU |