diff options
author | Hans Hagen <pragma@wxs.nl> | 2017-08-01 21:33:13 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2017-08-01 21:33:13 +0200 |
commit | 391b705af1c22eaa6027d18a146e8d3fafc8832f (patch) | |
tree | 5e3e1903b545c12d57e6aca4888c2200b176c91d /tex/context/base/mkiv/node-nut.lua | |
parent | 4afd5f6ad89594e3d8387b2acebefb6f37cb0cad (diff) | |
download | context-391b705af1c22eaa6027d18a146e8d3fafc8832f.tar.gz |
2017-08-01 18:16:00
Diffstat (limited to 'tex/context/base/mkiv/node-nut.lua')
-rw-r--r-- | tex/context/base/mkiv/node-nut.lua | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/tex/context/base/mkiv/node-nut.lua b/tex/context/base/mkiv/node-nut.lua index 54c3c7f9f..bbb629cd9 100644 --- a/tex/context/base/mkiv/node-nut.lua +++ b/tex/context/base/mkiv/node-nut.lua @@ -306,6 +306,8 @@ nuts.effective_glue = direct.effective_glue nuts.getglue = direct.getglue nuts.setglue = direct.setglue +nuts.getboxglue = direct.getglue +nuts.setboxglue = direct.setglue nuts.getdisc = direct.getdisc nuts.setdisc = direct.setdisc @@ -945,3 +947,21 @@ if not nuts.unprotect_glyph then end +if LUATEXFUNCTIONALITY < 6384 then + + local getfield = nuts.getfield + + function nuts.getboxglue(n,glue_set,glue_order,glue_sign) + return + getfield(n,"glue_set"), + getfield(n,"glue_order"), + getfield(h,"glue_sign") + end + + function nuts.setboxglue(n,glue_set,glue_order,glue_sign) + setfield(n,"glue_set", glue_set or 0) + setfield(n,"glue_order",glue_order or 0) + setfield(h,"glue_sign", glue_sign or 0) + end + +end |