summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/toks-tra.mkiv
diff options
context:
space:
mode:
authorContext Git Mirror Bot <phg42.2a@gmail.com>2016-07-30 01:22:07 +0200
committerContext Git Mirror Bot <phg42.2a@gmail.com>2016-07-30 01:22:07 +0200
commit5135aef167bec739fe429e1aa987671768b237bc (patch)
treebd9f9696704e57c45f453bb7dc6becd5501cb657 /tex/context/base/mkiv/toks-tra.mkiv
parent9d7c4ba8449bec1da920c01e24a17c41bbf2211d (diff)
downloadcontext-5135aef167bec739fe429e1aa987671768b237bc.tar.gz
2016-07-30 00:31:00
Diffstat (limited to 'tex/context/base/mkiv/toks-tra.mkiv')
-rw-r--r--tex/context/base/mkiv/toks-tra.mkiv11
1 files changed, 7 insertions, 4 deletions
diff --git a/tex/context/base/mkiv/toks-tra.mkiv b/tex/context/base/mkiv/toks-tra.mkiv
index a3e27eaf8..6186402a7 100644
--- a/tex/context/base/mkiv/toks-tra.mkiv
+++ b/tex/context/base/mkiv/toks-tra.mkiv
@@ -22,10 +22,13 @@
\unexpanded\def\starttokens [#1]{\ctxcommand{collecttokens("#1","stoptokens")}}
\let\stoptokens \relax
- \def\flushtokens [#1]{\ctxcommand{flushtokens("#1")}}
- \def\showtokens [#1]{\ctxcommand{showtokens("#1")}}
- \def\testtokens [#1]{\ctxcommand{testtokens("#1")}}
- \def\registertoken #1{\ctxcommand{registertoken("#1")}}
+\unexpanded\def\flushtokens [#1]{\ctxcommand{flushtokens("#1")}}
+\unexpanded\def\showtokens [#1]{\ctxcommand{showtokens("#1")}}
+\unexpanded\def\testtokens [#1]{\ctxcommand{testtokens("#1")}}
+\unexpanded\def\registertoken #1{\ctxcommand{registertoken("#1")}}
+\let\toks_show\showtokens % we also support the primitive
+
+\unexpanded\def\showtokens{\doifelsenextoptional\toks_show\normalshowtokens}
\protect \endinput