diff options
| author | Hironobu Yamashita <h.y.acetaminophen@gmail.com> | 2022-02-05 23:59:03 +0000 |
|---|---|---|
| committer | Hironobu Yamashita <h.y.acetaminophen@gmail.com> | 2022-02-05 23:59:03 +0000 |
| commit | 40f6f8a8caea0a857e30b560bf2f6f01f1296c08 (patch) | |
| tree | 5e3e26019e068b79c085a7498cd46209ce967e5e /Build/source/texk/web2c/eptexdir/eptex.ech | |
| parent | e665a6c3a8f6b343142332c31758ca1e18159d4b (diff) | |
e[u]ptex: \showmode follows \showstream
git-svn-id: svn://tug.org/texlive/trunk@61907 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/eptexdir/eptex.ech')
| -rw-r--r-- | Build/source/texk/web2c/eptexdir/eptex.ech | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/eptexdir/eptex.ech b/Build/source/texk/web2c/eptexdir/eptex.ech index ac90a5b3ab9..808ff512686 100644 --- a/Build/source/texk/web2c/eptexdir/eptex.ech +++ b/Build/source/texk/web2c/eptexdir/eptex.ech @@ -708,6 +708,16 @@ if_font_char_code:begin scan_font_ident; n:=cur_val; end; @z +@x e-pTeX: pTeX has \showmode, follow showstream.ch r61589 +@<Show the current japanese processing mode@>= +begin print_nl("> "); +@y +@<Show the current japanese processing mode@>= +begin + @<Adjust |selector| based on |show_stream|@> + print_nl("> "); +@z + @x procedure print_direction(@!d:integer); {print the direction represented by d} @y |