diff options
author | Hans Hagen <pragma@wxs.nl> | 2020-11-27 20:36:33 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-11-27 20:36:33 +0100 |
commit | f066d60455a53a472fac24abfb210cd6361ffb08 (patch) | |
tree | ebb1980d42a4804cc0a19b5f35f9189ab3f6afcd /tex/context/base/mkiv/node-ini.lua | |
parent | b27d13bebb952ac46eb5ee1305f4ad8a7183132c (diff) | |
download | context-f066d60455a53a472fac24abfb210cd6361ffb08.tar.gz |
2020-11-27 20:10:00
Diffstat (limited to 'tex/context/base/mkiv/node-ini.lua')
-rw-r--r-- | tex/context/base/mkiv/node-ini.lua | 32 |
1 files changed, 5 insertions, 27 deletions
diff --git a/tex/context/base/mkiv/node-ini.lua b/tex/context/base/mkiv/node-ini.lua index 3d49d01bd..701e3efa9 100644 --- a/tex/context/base/mkiv/node-ini.lua +++ b/tex/context/base/mkiv/node-ini.lua @@ -124,11 +124,10 @@ local noadoptions = allocate { right = 0x14 + 0x08, } -local dirvalues = CONTEXTLMTXMODE > 0 and mark(getvalues("dir")) - -if not dirvalues then - dirvalues = allocate { [0] = "lefttoright", [1] = "righttoleft" } -end +local dirvalues = allocate { + [0] = "lefttoright", + [1] = "righttoleft", +} local literalvalues = allocate { [0] = "origin", @@ -243,12 +242,9 @@ nodes.subtypes = allocate { -- [nodecodes.user] = usercodes, [nodecodes.vlist] = listcodes, [nodecodes.whatsit] = whatcodes, + [nodecodes.marginkern] = margincodes } -if CONTEXTLMTXMODE == 0 then - nodes.subtypes[nodecodes.marginkern] = margincodes -end - table.setmetatableindex(nodes.subtypes,function(t,k) local v = { } t[k] = v @@ -338,21 +334,3 @@ trackers.register("system.showcodes", nodes.showcodes) if node.fix_node_lists then node.fix_node_lists(false) end - --- We use the real node code numbers. - -if environment.initex and CONTEXTLMTXMODE > 0 then - - local texchardef = tex.chardef - - if texchardef then - for i=0,nodecodes.glyph do - texchardef(nodecodes[i] .. "nodecode",i) - end - for i=0,#gluecodes do - texchardef(gluecodes[i] .. "subtypecode",i) - end - -- tex.set("internalcodesmode",1) -- obsolete - end - -end |