diff options
Diffstat (limited to 'tex/context/base/mkxl/syst-aux.lmt')
| -rw-r--r-- | tex/context/base/mkxl/syst-aux.lmt | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/tex/context/base/mkxl/syst-aux.lmt b/tex/context/base/mkxl/syst-aux.lmt index eeb1c5aac..2d744e309 100644 --- a/tex/context/base/mkxl/syst-aux.lmt +++ b/tex/context/base/mkxl/syst-aux.lmt @@ -780,3 +780,30 @@ implement { public = true, actions = function() getshape("widowpenalties") end, } + +implement { + name = "loopcs", + public = true, + arguments = { "integerargument", "csname" }, + actions = function(n,cs) + local c = context[cs] + if n < 0 then + for i=-n,1 do c() end + else + for i= 1,n do c() end + end + end +} +implement { + name = "loopcsn", + public = true, + arguments = { "integerargument", "csname" }, + actions = function(n,cs) + local c = context[cs] + if n < 0 then + for i=-n,1 do c(i) end + else + for i= 1,n do c(i) end + end + end +} |