From 5c433e6e8accaa4bc9ebe0a094b925fe11a8edf5 Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Wed, 12 Sep 2018 01:13:39 +0200
Subject: 2018-09-12 00:46:00

---
 tex/context/base/mkiv/math-noa.lua | 22 ++++++++++++++--------
 1 file changed, 14 insertions(+), 8 deletions(-)

(limited to 'tex/context/base/mkiv/math-noa.lua')

diff --git a/tex/context/base/mkiv/math-noa.lua b/tex/context/base/mkiv/math-noa.lua
index 15d9bd0f1..0ff189e06 100644
--- a/tex/context/base/mkiv/math-noa.lua
+++ b/tex/context/base/mkiv/math-noa.lua
@@ -823,8 +823,8 @@ do
     local dummyfencechar  = 0x2E
 
     local function makefence(what,char)
-        local d = new_delimiter()
-        local f = new_fence()
+        local d = new_delimiter() -- todo: attr
+        local f = new_fence()     -- todo: attr
         if char then
             local sym = getnucleus(char)
             local chr = getchar(sym)
@@ -847,8 +847,8 @@ do
     -- will become
 
     -- local function makefence(what,char)
-    --     local d = new_delimiter()
-    --     local f = new_fence()
+    --     local d = new_delimiter() -- todo: attr
+    --     local f = new_fence()     -- todo: attr
     --     if char then
     --         local sym = getnucleus(char)
     --         local chr = getchar(sym)
@@ -1407,8 +1407,8 @@ do
     local c_negative_d = "trace:dr"
 
     local function insert_kern(current,kern)
-        local sub  = new_submlist()
-        local noad = new_noad()
+        local sub  = new_submlist() -- todo: attr
+        local noad = new_noad()     -- todo: attr
         setlist(sub,kern)
         setnext(kern,noad)
         setnucleus(noad,current)
@@ -1418,7 +1418,7 @@ do
     registertracker("math.italics.visualize", function(v)
         if v then
             italic_kern = function(k)
-                local n = new_kern(k)
+                local n = new_kern(k) -- todo: attr
                 set_visual(n,"italic")
                 return n
             end
@@ -1627,7 +1627,7 @@ do
                                     if trace_kernpairs then
                                         report_kernpairs("adding %p kerning between %C and %C",kern,first,second)
                                     end
-                                    setlink(parent,new_kern(kern),getnext(parent))
+                                    setlink(parent,new_kern(kern),getnext(parent)) -- todo: attr
                                 end
                             end
                         end
@@ -2212,6 +2212,12 @@ do
         return mlist_to_hlist(head,style,force_penalties or penalties)
     end
 
+ -- function builders.kernel.mlist_to_hlist(head,style,penalties)
+ --     local h = mlist_to_hlist(head,style,force_penalties or penalties)
+ --     inspect(nodes.totree(h,true,true,true))
+ --     return h
+ -- end
+
     implement {
         name      = "setmathpenalties",
         arguments = "integer",
-- 
cgit v1.2.3