diff options
Diffstat (limited to 'tex/context/base/mkiv/syst-lua.lmt')
| -rw-r--r-- | tex/context/base/mkiv/syst-lua.lmt | 23 |
1 files changed, 17 insertions, 6 deletions
diff --git a/tex/context/base/mkiv/syst-lua.lmt b/tex/context/base/mkiv/syst-lua.lmt index b1735d44e..673c99ae3 100644 --- a/tex/context/base/mkiv/syst-lua.lmt +++ b/tex/context/base/mkiv/syst-lua.lmt @@ -41,10 +41,6 @@ local char_given_code = cmd.char_given local math_given_code = cmd.math_given local xmath_given_code = cmd.xmath_given local some_item_code = cmd.some_item ------ call_code = cmd.call ------ the_code = cmd.the ------ convert_code = cmd.convert ------ lua_expandable_call_code = cmd.lua_expandable_call local getdimen = tex.getdimen local getglue = tex.getglue @@ -410,13 +406,28 @@ do end, } + local boolean_value = tokens.values.boolean + implement { name = "ifeof", public = true, usage = "condition", - actions = function(prefix) + actions = function() local n = scaninteger() - return tokens.values.boolean, not channels[n] + return boolean_value, not channels[n] + end, + } + + -- for the moment here: + + local getnest = tex.getnest + + implement { + name = "ifmvl", + public = true, + usage = "condition", + actions = function() + return boolean_value, getnest("ptr") == 0 end, } |