diff options
| author | Hans Hagen <pragma@wxs.nl> | 2023-06-04 19:46:50 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2023-06-04 19:46:50 +0200 |
| commit | e9ccab5308d2b6fec79e36c355c03aad4e1e5dec (patch) | |
| tree | 42a003cdebc84d23b9cc424ba47f11515b196385 /source/luametatex/source/tex/texscanning.c | |
| parent | e2ffa186c8e622ce9235533b91bb2399dd051672 (diff) | |
| download | context-e9ccab5308d2b6fec79e36c355c03aad4e1e5dec.tar.gz | |
Diffstat (limited to 'source/luametatex/source/tex/texscanning.c')
| -rw-r--r-- | source/luametatex/source/tex/texscanning.c | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/source/luametatex/source/tex/texscanning.c b/source/luametatex/source/tex/texscanning.c index 9559a4040..83abd12a3 100644 --- a/source/luametatex/source/tex/texscanning.c +++ b/source/luametatex/source/tex/texscanning.c @@ -3703,8 +3703,18 @@ halfword tex_scan_toks_expand(int left_brace_found, halfword *tail, int expandco switch (cur_cmd) { case call_cmd: case tolerant_call_cmd: +// case constant_call_cmd: tex_expand_current_token(); goto PICKUP; + case constant_call_cmd: + { + halfword h = token_link(cur_chr); + while (h) { + p = tex_store_new_token(p, token_info(h)); + h = token_link(h); + } + goto PICKUP; + } case protected_call_cmd: case tolerant_protected_call_cmd: cur_tok = cs_token_flag + cur_cs; @@ -4020,8 +4030,18 @@ halfword tex_scan_macro_expand(void) switch (cur_cmd) { case call_cmd: case tolerant_call_cmd: + // case constant_call_cmd: tex_expand_current_token(); goto PICKUP; + case constant_call_cmd: + { + halfword h = token_link(cur_chr); + while (h) { + p = tex_store_new_token(p, token_info(h)); + h = token_link(h); + } + goto PICKUP; + } case protected_call_cmd: case semi_protected_call_cmd: case tolerant_protected_call_cmd: |