diff options
| author | Hans Hagen <pragma@wxs.nl> | 2020-05-07 11:47:12 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-05-07 11:47:12 +0200 |
| commit | 352a2686282e95b2869728f8f321688f7e216d80 (patch) | |
| tree | a0cd6d8cd35aaf6c51632307786e4083e25c0df8 /tex/context/base/mkiv/node-res.lua | |
| parent | 3d0fae7aaf79674a41d2bdaf5b3c2a3a4d8113db (diff) | |
| download | context-352a2686282e95b2869728f8f321688f7e216d80.tar.gz | |
2020-05-07 11:00:00
Diffstat (limited to 'tex/context/base/mkiv/node-res.lua')
| -rw-r--r-- | tex/context/base/mkiv/node-res.lua | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tex/context/base/mkiv/node-res.lua b/tex/context/base/mkiv/node-res.lua index 1832a0d1e..9b76fed54 100644 --- a/tex/context/base/mkiv/node-res.lua +++ b/tex/context/base/mkiv/node-res.lua @@ -36,6 +36,7 @@ local glyph_code = nodecodes.glyph local rule_code = nodecodes.rule local kern_code = nodecodes.kern local glue_code = nodecodes.glue +local gluespec_code = nodecodes.gluespec local whatsit_code = nodecodes.whatsit local currentfont = font.current @@ -163,6 +164,7 @@ local fontkern = register_nut(new_nut(kern_code,kerncodes.fontkern)) local italickern = register_nut(new_nut(kern_code,kerncodes.italiccorrection)) local penalty = register_nut(new_nut(nodecodes.penalty)) local glue = register_nut(new_nut(glue_code)) +local gluespec = register_nut(new_nut(gluespec_code)) local glyph = register_nut(new_nut(glyph_code,0)) local textdir = register_nut(new_nut(nodecodes.dir)) @@ -283,6 +285,14 @@ function nutpool.italickern(k) return n end +function nutpool.gluespec(width,stretch,shrink,stretch_order,shrink_order) + local n = copy_nut(gluespec) + if width or stretch or shrink or stretch_order or shrink_order then + setglue(n,width,stretch,shrink,stretch_order,shrink_order) + end + return n +end + local function someskip(skip,width,stretch,shrink,stretch_order,shrink_order) -- maybe setglue local n = copy_nut(skip) |