summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/font-ini.lua
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/context/base/font-ini.lua')
-rw-r--r--Master/texmf-dist/tex/context/base/font-ini.lua68
1 files changed, 68 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/context/base/font-ini.lua b/Master/texmf-dist/tex/context/base/font-ini.lua
new file mode 100644
index 00000000000..a3eefa9db9a
--- /dev/null
+++ b/Master/texmf-dist/tex/context/base/font-ini.lua
@@ -0,0 +1,68 @@
+if not modules then modules = { } end modules ['font-ini'] = {
+ version = 1.001,
+ comment = "companion to font-ini.tex",
+ author = "Hans Hagen, PRAGMA-ADE, Hasselt NL",
+ copyright = "PRAGMA ADE / ConTeXt Development Team",
+ license = "see context related readme files"
+}
+
+--[[ldx--
+<p>Not much is happening here.</p>
+--ldx]]--
+
+-- vtf comes first
+-- fix comes last
+
+fonts = fonts or { }
+
+fonts.trace = false -- true
+fonts.mode = 'base'
+fonts.private = 0xE000
+
+fonts.methods = {
+ base = { tfm = { }, afm = { }, otf = { }, vtf = { }, fix = { } },
+ node = { tfm = { }, afm = { }, otf = { }, vtf = { }, fix = { } },
+}
+
+fonts.initializers = {
+ base = { tfm = { }, afm = { }, otf = { }, vtf = { }, fix = { } },
+ node = { tfm = { }, afm = { }, otf = { }, vtf = { }, fix = { } }
+}
+
+fonts.triggers = {
+ 'mode',
+ 'language',
+ 'script',
+ 'strategy',
+}
+
+fonts.manipulators = {
+}
+
+fonts.define = fonts.define or { }
+fonts.define.specify = fonts.define.specify or { }
+fonts.define.specify.synonyms = fonts.define.specify.synonyms or { }
+
+-- tracing
+
+do
+
+ fonts.color = fonts.color or { }
+
+ fonts.color.trace = false
+
+ local attribute = attributes.numbers['color'] or 7 -- we happen to know this -)
+ local mapping = attributes.list[attribute]
+
+ local set_attribute = node.set_attribute
+ local unset_attribute = node.unset_attribute
+
+ function fonts.color.set(n,c)
+ -- local mc = mapping[c] if mc then unset_attribute((n,attribute) else set_attribute(n,attribute,mc) end
+ set_attribute(n,attribute,mapping[c] or -1) -- also handles -1 now
+ end
+ function fonts.color.reset(n)
+ unset_attribute(n,attribute)
+ end
+
+end