diff options
Diffstat (limited to 'tex/context/base/math-frc.lua')
-rw-r--r-- | tex/context/base/math-frc.lua | 102 |
1 files changed, 51 insertions, 51 deletions
diff --git a/tex/context/base/math-frc.lua b/tex/context/base/math-frc.lua index 4f531a530..077da643b 100644 --- a/tex/context/base/math-frc.lua +++ b/tex/context/base/math-frc.lua @@ -1,51 +1,51 @@ -if not modules then modules = { } end modules ['math-frc'] = { - version = 1.001, - comment = "companion to math-frc.mkiv", - author = "Hans Hagen, PRAGMA-ADE, Hasselt NL", - copyright = "PRAGMA ADE / ConTeXt Development Team", - license = "see context related readme files" -} - -local utfchar = utf.char - -local context = context -local variables = interfaces.variables - -local v_no = variables.no -local v_yes = variables.yes - -local resolved = { - [0x007B] = "\\{", - [0x007D] = "\\}", -} - -table.setmetatableindex(resolved, function(t,k) - local v = utfchar(k) - t[k] = v - return v -end) - -local normalatop = context.normalatop -local normalover = context.normalover - -function commands.math_frac(how,left,right,width) - if how == v_no then - if left == 0x002E and right == 0x002E then - normalatop() - else - context("\\atopwithdelims%s%s",resolved[left],resolved[right]) - end - elseif how == v_yes then - if left == 0x002E and right == 0x002E then - context("\\normalabove%ssp",width) - else - context("\\abovewithdelims%s%s%ssp",resolved[left],resolved[right],width) - end - else -- v_auto - if left == 0x002E and right == 0x002E then - normalover() - else - context("\\overwithdelims%s%s",resolved[left],resolved[right]) - end - end -end +if not modules then modules = { } end modules ['math-frc'] = {
+ version = 1.001,
+ comment = "companion to math-frc.mkiv",
+ author = "Hans Hagen, PRAGMA-ADE, Hasselt NL",
+ copyright = "PRAGMA ADE / ConTeXt Development Team",
+ license = "see context related readme files"
+}
+
+local utfchar = utf.char
+
+local context = context
+local variables = interfaces.variables
+
+local v_no = variables.no
+local v_yes = variables.yes
+
+local resolved = {
+ [0x007B] = "\\{",
+ [0x007D] = "\\}",
+}
+
+table.setmetatableindex(resolved, function(t,k)
+ local v = utfchar(k)
+ t[k] = v
+ return v
+end)
+
+local normalatop = context.normalatop
+local normalover = context.normalover
+
+function commands.math_frac(how,left,right,width)
+ if how == v_no then
+ if left == 0x002E and right == 0x002E then
+ normalatop()
+ else
+ context("\\atopwithdelims%s%s",resolved[left],resolved[right])
+ end
+ elseif how == v_yes then
+ if left == 0x002E and right == 0x002E then
+ context("\\normalabove%ssp",width)
+ else
+ context("\\abovewithdelims%s%s%ssp",resolved[left],resolved[right],width)
+ end
+ else -- v_auto
+ if left == 0x002E and right == 0x002E then
+ normalover()
+ else
+ context("\\overwithdelims%s%s",resolved[left],resolved[right])
+ end
+ end
+end
|