summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/mkiv/cldf-com.lua
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/context/base/mkiv/cldf-com.lua')
-rw-r--r--Master/texmf-dist/tex/context/base/mkiv/cldf-com.lua38
1 files changed, 38 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/context/base/mkiv/cldf-com.lua b/Master/texmf-dist/tex/context/base/mkiv/cldf-com.lua
new file mode 100644
index 00000000000..bd357b712b2
--- /dev/null
+++ b/Master/texmf-dist/tex/context/base/mkiv/cldf-com.lua
@@ -0,0 +1,38 @@
+if not modules then modules = { } end modules ['cldf-com'] = {
+ version = 1.001,
+ comment = "companion to cldf-com.mkiv",
+ author = "Hans Hagen, PRAGMA-ADE, Hasselt NL",
+ copyright = "PRAGMA ADE / ConTeXt Development Team",
+ license = "see context related readme files"
+}
+
+-- todo ... needs more thinking ... a special table toolkit
+
+local tostring = tostring
+local context = context
+local generics = context.generics -- needs documentation
+local variables = interfaces.variables
+
+generics.starttabulate = "starttabulate" -- "start" .. variables.tabulate -- todo: e!start
+generics.stoptabulate = "stoptabulate" -- "stop" .. variables.tabulate -- todo: e!stop
+
+local NC, NR = context.NC, context.NR
+
+local function tabulaterow(how,...)
+ for i=1,select("#",...) do
+ local ti = tostring(select(i,...))
+ NC()
+ if how then
+ context[how](ti)
+ else
+ context(ti)
+ end
+ end
+ NC()
+ NR()
+end
+
+function context.tabulaterow (...) tabulaterow(false, ...) end
+function context.tabulaterowbold(...) tabulaterow("bold",...) end
+function context.tabulaterowtype(...) tabulaterow("type",...) end
+function context.tabulaterowtyp (...) tabulaterow("typ", ...) end