diff options
author | Karl Berry <karl@freefriends.org> | 2019-05-27 22:19:58 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2019-05-27 22:19:58 +0000 |
commit | 5745d536ad94229e1de0d05dcbe2848eb4f828a7 (patch) | |
tree | 5b129087b826857af3774d89f95427e45d4329f0 /Build/source/texk/web2c/uptexdir/tests/test_if.tex | |
parent | 8b74d4bc29c232c01644c6451e80052a57a14718 (diff) |
(u)ptex fix from ttk committed to branch2019
git-svn-id: svn://tug.org/texlive/branches/branch2019@51236 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/uptexdir/tests/test_if.tex')
-rw-r--r-- | Build/source/texk/web2c/uptexdir/tests/test_if.tex | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/uptexdir/tests/test_if.tex b/Build/source/texk/web2c/uptexdir/tests/test_if.tex new file mode 100644 index 00000000000..35588f992c1 --- /dev/null +++ b/Build/source/texk/web2c/uptexdir/tests/test_if.tex @@ -0,0 +1,29 @@ +\kcatcode`あ=18 +\def\xA{あ}\let\yA=あ +\kcatcode`あ=17 +\def\xB{あ}\let\yB=あ +\kcatcode`あ=16 + +\message{\ifcat あ\xA Y\else N\fi} +\message{\ifcat あ\yA Y\else N\fi} +\message{\ifcat あ\xB Y\else N\fi} +\message{\ifcat あ\yB Y\else N\fi} + +\message{\if あ\xA Y\else N\fi} +\message{\if あ\yA Y\else N\fi} +\message{\if い\xA Y\else N\fi} +\message{\if い\yA Y\else N\fi} + +\ifx\ucs\undefined\else + \kcatcode"100=16 + \message{upTeX} + \def\xA{Ā}% U+0100 + \def\xB{ā}% U+0101 + \message{\if \xA\relax Y\else N\fi} + \message{\if \xB\relax Y\else N\fi} + \message{\ifcat\xA\relax Y\else N\fi} + \message{\ifcat\xB\relax Y\else N\fi} +\fi +\end + + |