From 60a40e531d791469d825d3f2a8d6aa8ba4ac46f2 Mon Sep 17 00:00:00 2001
From: Takuji Tanaka <KXD02663@nifty.ne.jp>
Date: Sun, 9 Apr 2017 08:15:00 +0000
Subject: (u)pTeX: bug fix on \endlinechar by Kitagawa-san

git-svn-id: svn://tug.org/texlive/trunk@43720 c570f23f-e606-0410-a88d-b1316a301751
---
 .../texk/web2c/ptexdir/tests/endlinechar.tex       | 53 ++++++++++++++++++++++
 1 file changed, 53 insertions(+)
 create mode 100644 Build/source/texk/web2c/ptexdir/tests/endlinechar.tex

(limited to 'Build/source/texk/web2c/ptexdir/tests/endlinechar.tex')

diff --git a/Build/source/texk/web2c/ptexdir/tests/endlinechar.tex b/Build/source/texk/web2c/ptexdir/tests/endlinechar.tex
new file mode 100644
index 00000000000..ef59b1fc886
--- /dev/null
+++ b/Build/source/texk/web2c/ptexdir/tests/endlinechar.tex
@@ -0,0 +1,53 @@
+\font\x=ecrm1000 \x
+\parindent0pt\noautoxspacing
+\output{\shipout\box255}
+\def\あ{ア}
+\def\，{イ}
+
+1a\，
+% --> 1aイ
+
+2a\あ
+% --> 2aア
+
+\endlinechar=-1\relax
+
+3a\，
+% --> 3aイ
+% previous pTeX, upTeX: Undefined cs.
+
+4a\あ
+% --> 4aア
+% prev. pTeX: Undefined cs.
+
+5a，
+% prev. upTeX: byte-seq.
+
+6aあ
+% prev. upTeX: byte-seq.
+
+7a\^^e3^^81^^82b\^^e3^^81^^82
+% 2回エラーが出るが，これは正しい．
+
+% upTeX only tests
+\ifx\enablecjktoken\undefined
+\else
+  \catcode"E3=11\relax
+  \catcode"81=11\relax
+  \catcode"82=11\relax
+  8a\^^e3^^81^^82
+  % --> 8aア
+  \kcatcode`あ=15\relax
+  9a\あ
+  % == 9a\^^e3^^81^^82. --> 9aア
+  \def\^^e3^^81^^82{ウ}
+  10a\あ b\あ
+  % == 10a\^^e3^^81^^82 b\^^e3^^81^^82. --> 10aウbウ
+  \kcatcode12354=16\relax
+  11a\あ b\あ
+  % == 10a\^^e3^^81^^82 b\^^e3^^81^^82. --> 11aウbウ
+\fi
+
+\bye
+
+
-- 
cgit v1.2.3

