summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/uptexdir/tests/jchwidow.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/uptexdir/tests/jchwidow.tex')
-rw-r--r--Build/source/texk/web2c/uptexdir/tests/jchwidow.tex88
1 files changed, 88 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/uptexdir/tests/jchwidow.tex b/Build/source/texk/web2c/uptexdir/tests/jchwidow.tex
new file mode 100644
index 00000000000..44ba3d3db72
--- /dev/null
+++ b/Build/source/texk/web2c/uptexdir/tests/jchwidow.tex
@@ -0,0 +1,88 @@
+%#!euptex
+\font\cmr=cmr10\cmr
+\ifx\kanjiskip\undefined\else
+ \ifnum\jis"2121="3000
+ \jfont\jpy=umin10 at 10pt\jpy
+ \else
+ \jfont\jpy=min10 at 10pt\jpy
+ \fi
+\fi
+
+\def\TEST#1{{\setbox0=\vbox{\noindent
+ ああああああ%
+ \ifx\scantokens\undefined\else\scantokens\fi
+ {#1}}\showboxbreadth10000\showboxdepth10000\tracingonline1\showbox0}}
+
+\message{TEST}
+
+\chardef\CR=`す
+\TEST{す{\kcatcode`す=18 す}「。}
+\TEST{\CR。}
+\ifx\Ucharcat\undefined\else
+\TEST{\Ucharcat`す 16。}
+\TEST{\Ucharcat`す 17。}
+\TEST{\Ucharcat`す 18。}
+\TEST{\Ucharcat`す 19。}
+\fi
+
+\TEST{す。}
+\TEST{す\char\kuten"0103}
+\ifx\kchar\undefined\else
+\TEST{す\kchar\kuten"0103}
+\fi
+
+\TEST{\char\kuten"0419。}
+\TEST{\char\kuten"0419\char\kuten"0103}
+\ifx\kchar\undefined\else
+\TEST{\char\kuten"0419\kchar\kuten"0103}
+
+\kchardef\KR=`す
+\TEST{\KR。}
+\TEST{\kchar\kuten"0419。}
+\TEST{\kchar\kuten"0419\char\kuten"0103}
+\TEST{\kchar\kuten"0419\kchar\kuten"0103}
+\fi
+
+{\kcatcode`α=15
+\ifx\kchar\undefined\else
+ \message{KCHAR"3B1, kcatcode=15}
+ \def\S{\kchar"03B1}
+ \TEST{い\kchar"03B1。}
+ \TEST{\kchar"03B1。}
+ \TEST{\relax\kchar"03B1。}
+ \TEST{\vrule\kchar"03B1。}
+ \TEST{b\kchar"03B1。}
+ \TEST{い\S。}
+\fi
+
+ \message{CHAR"3B1, kcatcode=15}
+ \def\S{\char"03B1}
+ \TEST{い\char"03B1。}
+ \TEST{\char"03B1。}
+ \TEST{\relax\char"03B1。}
+ \TEST{\vrule\char"03B1。}
+ \TEST{b\char"03B1。}
+ \TEST{い\S。}
+
+\ifx\kchardef\undefined\else
+ \message{KCHARDEF"3B1, kcatcode=15}
+ \kchardef\KA="3B1
+ \TEST{い\KA 。}
+ \TEST{\KA 。}
+ \TEST{\relax\KA 。}
+ \TEST{\vrule\KA 。}
+ \TEST{b\KA 。}
+ \TEST{い\S。}
+\fi
+
+ \message{CHARDEF"3B1, kcatcode=15}
+ \chardef\CA="3B1
+ \TEST{い\CA 。}
+ \TEST{\CA 。}
+ \TEST{\relax\CA 。}
+ \TEST{\vrule\CA 。}
+ \TEST{b\CA 。}
+}
+
+\bye
+