From 5463542d926a6ca73d86251154cabc00a9333fa5 Mon Sep 17 00:00:00 2001 From: Marius Date: Thu, 18 Aug 2011 17:40:23 +0300 Subject: beta 2011.08.18 16:00 --- tex/context/base/font-ctx.lua | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) (limited to 'tex/context/base/font-ctx.lua') diff --git a/tex/context/base/font-ctx.lua b/tex/context/base/font-ctx.lua index 1d7580d84..7b5b5fd10 100644 --- a/tex/context/base/font-ctx.lua +++ b/tex/context/base/font-ctx.lua @@ -109,12 +109,14 @@ setmetatableindex(fontdata, function(t,k) return nulldata end) local chardata = allocate() -- chardata local parameters = allocate() local csnames = allocate() -- namedata -local quaddata = allocate() -- quaddata +local quaddata = allocate() +local markdata = allocate() local xheightdata = allocate() -- xheightdata hashes.characters = chardata hashes.parameters = parameters hashes.quads = quaddata +hashes.marks = markdata hashes.xheights = xheightdata hashes.csnames = csnames @@ -137,6 +139,13 @@ setmetatableindex(quaddata, function(t,k) return quad end) +setmetatableindex(markdata, function(t,k) + local resources = fontdata[k].resources or { } + local marks = resources.marks or { } + t[k] = marks + return marks +end) + setmetatableindex(xheightdata, function(t,k) local parameters = parameters[k] local xheight = parameters and parameters.xheight or 0 -- cgit v1.2.3