diff options
author | Hans Hagen <pragma@wxs.nl> | 2020-06-10 10:02:10 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-06-10 10:02:10 +0200 |
commit | 0226b596b39ea5d055dc37ea0609b67b64fe3d75 (patch) | |
tree | b8e19522cb8e3a0683da0db73b23e40b5d6a9437 /tex/context/base/mkiv/toks-ini.lua | |
parent | 0aa14799b67298a50dd2c31c249622915e103994 (diff) | |
download | context-0226b596b39ea5d055dc37ea0609b67b64fe3d75.tar.gz |
2020-06-09 18:55:00
Diffstat (limited to 'tex/context/base/mkiv/toks-ini.lua')
-rw-r--r-- | tex/context/base/mkiv/toks-ini.lua | 21 |
1 files changed, 20 insertions, 1 deletions
diff --git a/tex/context/base/mkiv/toks-ini.lua b/tex/context/base/mkiv/toks-ini.lua index f38cf915f..da5affa63 100644 --- a/tex/context/base/mkiv/toks-ini.lua +++ b/tex/context/base/mkiv/toks-ini.lua @@ -67,7 +67,7 @@ local scan_luainteger = token.scan_luainteger or scan_int -- only lmtx local scan_luacardinal = token.scan_luacardinal or scan_int -- only lmtx local get_next = token.get_next -local get_next_token = token.get_next_token +----- get_next_token = token.get_next_token local skip_next = token.skip_next local peek_next_char = token.peek_next_char local is_next_char = token.is_next_char @@ -90,6 +90,9 @@ tokens.istoken = is_token tokens.isdefined = is_defined tokens.defined = is_defined +tokens.getdata = token.get_data -- only lmtx +tokens.setdata = token.set_data -- only lmtx + local bits = { escape = 0x00000001, -- 2^00 begingroup = 0x00000002, -- 2^01 @@ -278,6 +281,7 @@ if setinspector then frozen = t.frozen, mode = t.mode, index = t.index, + user = t.user, cmdname = cmdname, } end @@ -298,3 +302,18 @@ tokens.cache = table.setmetatableindex(function(t,k) t[k] = v return v end) + +if LUATEXVERSION < 114 and CONTEXTLMTXMODE == 0 then + + local d = tokens.defined + local c = tokens.create + + function tokens.defined(s,b) + if b then + return d(s) + else + return c(s).cmd_name == "undefined_cmd" + end + end + +end |