diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/base/cldf-com.lua')
-rw-r--r-- | Master/texmf-dist/tex/context/base/cldf-com.lua | 72 |
1 files changed, 2 insertions, 70 deletions
diff --git a/Master/texmf-dist/tex/context/base/cldf-com.lua b/Master/texmf-dist/tex/context/base/cldf-com.lua index e966b167b20..bacbbeafd6a 100644 --- a/Master/texmf-dist/tex/context/base/cldf-com.lua +++ b/Master/texmf-dist/tex/context/base/cldf-com.lua @@ -6,11 +6,9 @@ if not modules then modules = { } end modules ['cldf-com'] = { license = "see context related readme files" } -local tostring, type = tostring, type -local format = string.format - +local tostring = tostring local context = context -local generics = context.generics +local generics = context.generics -- needs documentation local variables = interfaces.variables generics.starttabulate = "start" .. variables.tabulate -- todo: e!start @@ -37,69 +35,3 @@ function context.tabulaterow (...) tabulaterow(false, ...) end function context.tabulaterowbold(...) tabulaterow("bold",...) end function context.tabulaterowtype(...) tabulaterow("type",...) end function context.tabulaterowtyp (...) tabulaterow("typ", ...) end - --- these will move up, just after cld definitions - -function context.char(k) -- todo: if catcode == letter or other then just the utf - if type(k) == "table" then - for i=1,#k do - context(format([[\char%s\relax]],k[i])) - end - elseif k then - context(format([[\char%s\relax]],k)) - end -end - -function context.utfchar(k) - context(utfchar(k)) -end - --- plain variants - -function context.chardef(cs,u) - context(format([[\chardef\%s=%s\relax]],k)) -- context does already do format -end - -function context.par() - context([[\par]]) -- no need to add {} there -end - -function context.bgroup() - context("{") -end - -function context.egroup() - context("}") -end - -local rule = nodes.pool.rule - -function context.hrule(w,h,d,dir) - if type(w) == "table" then - context(rule(w.width,w.height,w.depth,w.dir)) - else - context(rule(w,h,d,dir)) - end -end - -context.vrule = context.hrule - ---~ local hbox, bgroup, egroup = context.hbox, context.bgroup, context.egroup - ---~ function context.hbox(a,...) ---~ if type(a) == "table" then ---~ local s = { } ---~ if a.width then ---~ s[#s+1] = "to " .. a.width -- todo: check for number ---~ elseif a.spread then ---~ s[#s+1] = "spread " .. a.spread -- todo: check for number ---~ end ---~ -- todo: dir, attr etc ---~ hbox(false,table.concat(s," ")) ---~ bgroup() ---~ context(string.format(...)) ---~ egroup() ---~ else ---~ hbox(a,...) ---~ end ---~ end |