diff options
author | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-01-12 17:15:07 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-01-12 17:15:07 +0100 |
commit | 8d8d528d2ad52599f11250cfc567fea4f37f2a8b (patch) | |
tree | 94286bc131ef7d994f9432febaf03fe23d10eef8 /tex/context/base/syst-con.lua | |
parent | f5aed2e51223c36c84c5f25a6cad238b2af59087 (diff) | |
download | context-8d8d528d2ad52599f11250cfc567fea4f37f2a8b.tar.gz |
2016-01-12 16:26:00
Diffstat (limited to 'tex/context/base/syst-con.lua')
-rw-r--r-- | tex/context/base/syst-con.lua | 68 |
1 files changed, 0 insertions, 68 deletions
diff --git a/tex/context/base/syst-con.lua b/tex/context/base/syst-con.lua deleted file mode 100644 index 0fa685b2d..000000000 --- a/tex/context/base/syst-con.lua +++ /dev/null @@ -1,68 +0,0 @@ -if not modules then modules = { } end modules ['syst-con'] = { - version = 1.001, - comment = "companion to syst-con.mkiv", - author = "Hans Hagen, PRAGMA-ADE, Hasselt NL", - copyright = "PRAGMA ADE / ConTeXt Development Team", - license = "see context related readme files" -} - -local tonumber = tonumber -local math = math -local utfchar = utf.char -local gsub = string.gsub - -converters = converters or { } -local converters = converters - -local context = context -local commands = commands -local implement = interfaces.implement - -local formatters = string.formatters - ---[[ldx-- -<p>For raw 8 bit characters, the offset is 0x110000 (bottom of plane 18) at -the top of <l n='luatex'/>'s char range but outside the unicode range.</p> ---ldx]]-- - -function converters.hexstringtonumber(n) tonumber(n,16) end -function converters.octstringtonumber(n) tonumber(n, 8) end - -function converters.rawcharacter (n) utfchar(0x110000+n) end - -local lchexnumber = formatters["%x"] -local uchexnumber = formatters["%X"] -local lchexnumbers = formatters["%02x"] -local uchexnumbers = formatters["%02X"] -local octnumber = formatters["%03o"] -local nicenumber = formatters["%0.6F"] - -converters.lchexnumber = lchexnumber -converters.uchexnumber = uchexnumber -converters.lchexnumbers = lchexnumbers -converters.uchexnumbers = uchexnumbers -converters.octnumber = octnumber -converters.nicenumber = nicenumber - -implement { name = "hexstringtonumber", actions = { tonumber, context }, arguments = { "integer", 16 } } -implement { name = "octstringtonumber", actions = { tonumber, context }, arguments = { "integer", 8 } } - -implement { name = "rawcharacter", actions = function(n) context(utfchar(0x110000+n)) end, arguments = "integer" } - -implement { name = "lchexnumber", actions = { lchexnumber, context }, arguments = "integer" } -implement { name = "uchexnumber", actions = { uchexnumber, context }, arguments = "integer" } -implement { name = "lchexnumbers", actions = { lchexnumbers, context }, arguments = "integer" } -implement { name = "uchexnumbers", actions = { uchexnumbers, context }, arguments = "integer" } -implement { name = "octnumber", actions = { octnumber, context }, arguments = "integer" } - -implement { name = "sin", actions = { math.sin, nicenumber, context }, arguments = "number" } -implement { name = "cos", actions = { math.cos, nicenumber, context }, arguments = "number" } -implement { name = "tan", actions = { math.tan, nicenumber, context }, arguments = "number" } - -implement { name = "sind", actions = { math.sind, nicenumber, context }, arguments = "number" } -implement { name = "cosd", actions = { math.cosd, nicenumber, context }, arguments = "number" } -implement { name = "tand", actions = { math.tand, nicenumber, context }, arguments = "number" } - --- only as commands - -function commands.format(fmt,...) context((gsub(fmt,"@","%%")),...) end |