summaryrefslogtreecommitdiff
path: root/tex/context/base/math-ini.lua
diff options
context:
space:
mode:
authorMarius <mariausol@gmail.com>2011-03-27 15:20:14 +0300
committerMarius <mariausol@gmail.com>2011-03-27 15:20:14 +0300
commit7343ad49feb683f1e82569cad484b9de40694b28 (patch)
treea3beef6dd6a74a51547c49828f96ae0b4b7ee023 /tex/context/base/math-ini.lua
parentbc20cf026cb0d2a175c116c5840d167f341d885e (diff)
downloadcontext-7343ad49feb683f1e82569cad484b9de40694b28.tar.gz
beta 2011.03.27 14:17
Diffstat (limited to 'tex/context/base/math-ini.lua')
-rw-r--r--tex/context/base/math-ini.lua134
1 files changed, 0 insertions, 134 deletions
diff --git a/tex/context/base/math-ini.lua b/tex/context/base/math-ini.lua
index b211f7dd2..a122f7229 100644
--- a/tex/context/base/math-ini.lua
+++ b/tex/context/base/math-ini.lua
@@ -9,8 +9,6 @@ if not modules then modules = { } end modules ['math-ext'] = {
-- if needed we can use the info here to set up xetex definition files
-- the "8000 hackery influences direct characters (utf) as indirect \char's
-local utf = unicode.utf8
-
local texsprint, format, utfchar, utfbyte = tex.sprint, string.format, utf.char, utf.byte
local setmathcode, setdelcode = tex.setmathcode, tex.setdelcode
@@ -367,135 +365,3 @@ function mathematics.big(tfmdata,unicode,n)
return unicode
end
--- plugins (will be proper handler, once we have separated generic from context)
-
-local sequencers = utilities.sequencers
-local appendgroup = sequencers.appendgroup
-local appendaction = sequencers.appendaction
-local mathprocessor = nil
-
-local mathactions = sequencers.reset {
- arguments = "target,original,directives",
-}
-
-function fonts.constructors.mathactions(original,target,directives)
- if mathactions.dirty then -- maybe use autocompile
- mathprocessor = sequencers.compile(mathactions)
- end
- mathprocessor(original,target,directives or {})
-end
-
-appendgroup(mathactions,"before") -- user
-appendgroup(mathactions,"system") -- private
-appendgroup(mathactions,"after" ) -- user
-
-function mathematics.initializeparameters(target,original,directives)
- local mathparameters = original.mathparameters
- if mathparameters and next(mathparameters) then
- local _, mp = mathematics.dimensions(mathparameters)
- target.mathparameters = mp -- for ourselves
- target.MathConstants = mp -- for luatex
- end
-end
-
-sequencers.appendaction(mathactions,"system","mathematics.initializeparameters")
-
-local how = {
- -- RadicalKernBeforeDegree = "horizontal",
- -- RadicalKernAfterDegree = "horizontal",
- RadicalDegreeBottomRaisePercent = "unscaled"
-}
-
-function mathematics.scaleparameters(target,original,directives)
- if not directives.disablescaling then
- local mathparameters = target.mathparameters
- if mathparameters and next(mathparameters) then
- local parameters = target.parameters
- local factor = parameters.factor
- local hfactor = parameters.hfactor
- local vfactor = parameters.vfactor
- for name, value in next, mathparameters do
- local h = how[name]
- if h == "unscaled" then
- mathparameters[name] = value
- elseif h == "horizontal" then
- mathparameters[name] = value * hfactor
- elseif h == "vertical"then
- mathparameters[name] = value * vfactor
- else
- mathparameters[name] = value * factor
- end
- end
- end
- end
-end
-
-sequencers.appendaction(mathactions,"system","mathematics.scaleparameters")
-
-function mathematics.checkaccentbaseheight(target,original,directives)
- local MathConstants = target.MathConstants
- if MathConstants then
- MathConstants.AccentBaseHeight = nil -- safeguard
- end
-end
-
-sequencers.appendaction(mathactions,"system","mathematics.checkaccentbaseheight")
-
-function mathematics.checkprivateparameters(target,original,directives)
- local MathConstants = target.MathConstants
- if MathConstants then
- if not MathConstants.FractionDelimiterSize then
- MathConstants.FractionDelimiterSize = 0
- end
- if not MathConstants.FractionDelimiterDisplayStyleSize then
- MathConstants.FractionDelimiterDisplayStyleSize = 0
- end
- end
-end
-
-sequencers.appendaction(mathactions,"system","mathematics.checkprivateparameters")
-
-function mathematics.overloadparameters(target,original,directives)
- local mathparameters = target.mathparameters
- if mathparameters and next(mathparameters) then
- local goodies = target.goodies
- if goodies then
- for i=1,#goodies do
- local goodie = goodies[i]
- local mathematics = goodie.mathematics
- local parameters = mathematics and mathematics.parameters
- if parameters then
- if trace_defining then
- report_math("overloading math parameters in '%s' @ %s",target.properties.fullname,target.parameters.size)
- end
- for name, value in next, parameters do
- local tvalue = type(value)
- if tvalue == "string" then
- report_math("comment for math parameter '%s': %s",name,value)
- else
- local oldvalue = mathparameters[name]
- local newvalue = oldvalue
- if oldvalue then
- if tvalue == "number" then
- newvalue = value
- elseif tvalue == "function" then
- newvalue = value(oldvalue,target,original)
- elseif not tvalue then
- newvalue = nil
- end
- if trace_defining and oldvalue ~= newvalue then
- report_math("overloading math parameter '%s': %s => %s",name,tostring(oldvalue),tostring(newvalue))
- end
- else
- report_math("invalid math parameter '%s'",name)
- end
- mathparameters[name] = newvalue
- end
- end
- end
- end
- end
- end
-end
-
-sequencers.appendaction(mathactions,"system","mathematics.overloadparameters")