summaryrefslogtreecommitdiff
path: root/tex/context/base/node-typ.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/node-typ.lua')
-rw-r--r--tex/context/base/node-typ.lua12
1 files changed, 7 insertions, 5 deletions
diff --git a/tex/context/base/node-typ.lua b/tex/context/base/node-typ.lua
index f1aacf25a..6c5577f08 100644
--- a/tex/context/base/node-typ.lua
+++ b/tex/context/base/node-typ.lua
@@ -16,6 +16,9 @@ local tonode = nuts.tonode
local tonut = nuts.tonut
local setfield = nuts.setfield
+local setlink = nuts.setlink
+local setchar = nuts.setchar
+
local getfont = nuts.getfont
local hpack_node_list = nuts.hpack
@@ -58,7 +61,7 @@ local function tonodes(str,fontid,spacing,templateglyph) -- quick and dirty
end
elseif templateglyph then
next = copy_glyph(templateglyph)
- setfield(next,"char",c)
+ setchar(next,c)
spacedone = false
else
next = new_glyph(fontid or 1,c)
@@ -69,8 +72,7 @@ local function tonodes(str,fontid,spacing,templateglyph) -- quick and dirty
elseif not head then
head = next
else
- setfield(prev,"next",next)
- setfield(next,"prev",prev)
+ setlink(prev,next)
end
prev = next
end
@@ -116,7 +118,7 @@ typesetters.hpack = typesetters.tohpack -- obsolete
typesetters.fast_hpack = typesetters.tofasthpack -- obsolete
typesetters.vpack = typesetters.tovpack -- obsolete
--- node.write(nodes.typestters.hpack("Hello World!"))
--- node.write(nodes.typestters.hpack("Hello World!",1,100*1024*10))
+-- node.write(nodes.typesetters.hpack("Hello World!"))
+-- node.write(nodes.typesetters.hpack("Hello World!",1,100*1024*10))
string.tonodes = function(...) return tonode(tonodes(...)) end -- quite convenient