diff options
author | Hans Hagen <pragma@wxs.nl> | 2010-11-17 13:27:00 +0100 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2010-11-17 13:27:00 +0100 |
commit | 96bea07ac35ee9463fe89985c4b887a55579a4c9 (patch) | |
tree | 746b4509a8ef9049f311e331285434089e4a1a8a /tex/context/base/font-ctx.lua | |
parent | 953cd0a613be25ad37baaa745758862262e46395 (diff) | |
download | context-96bea07ac35ee9463fe89985c4b887a55579a4c9.tar.gz |
beta 2010.11.17 13:27
Diffstat (limited to 'tex/context/base/font-ctx.lua')
-rw-r--r-- | tex/context/base/font-ctx.lua | 33 |
1 files changed, 30 insertions, 3 deletions
diff --git a/tex/context/base/font-ctx.lua b/tex/context/base/font-ctx.lua index eb0990ec1..91fc72e6b 100644 --- a/tex/context/base/font-ctx.lua +++ b/tex/context/base/font-ctx.lua @@ -62,13 +62,40 @@ local xheightdata = fonts.xheights fonts.ids = fontdata -- we keep this one for a while (as it is used in mk etc) + +-- todo: give parameters at the lua end a metatable + +--~ function parameters(t,k) +--~ local v = 0 +--~ if k == "x_height" then v = t.xheight +--~ elseif k == "space_stretch" then v = t.spacestretch +--~ elseif k == "space_shrink" then v = t.spaceshrink +--~ elseif k == "extra_space" then v = t.extraspace +--~ elseif k == 1 then v = t.slant +--~ elseif k == 2 then v = t.space +--~ elseif k == 3 then v = t.spacestretch +--~ elseif k == 4 then v = t.spaceshrink +--~ elseif k == 5 then v = t.xheight +--~ elseif k == 6 then v = t.quad +--~ elseif k == 7 then v = t.extraspace +--~ end +--~ t[k] = v +--~ return v +--~ end + local nulldata = { name = "nullfont", characters = { }, descriptions = { }, - parameters = { - xheight = 0, - quad = 0, + parameters = { -- lmromanregular @ 12pt + slant = 0, -- 1 + space = 256377, -- 2 + spacestretch = 128188, -- 3 + spaceshrink = 85459, -- 4 + xheight = 338952, -- 5 + quad = 786432, -- 6 + extraspace = 85459, -- 7 + }, } |