-%#!luatex
+%#!luatex test04-jfm ; pdftotext test04-jfm.pdf /tmp/new
\input luatexja-core.sty
-
+\pdfcompresslevel=0
\def\head#1{\medskip\penalty-100\noindent{\bf\tengt ■ #1}\par\penalty10000 }
\jfont\rml={psft:Ryumin-Light:jfm=ujis} at 10pt
\rml あ\inhibitglue\char"201Cあ・い←Ryumin-Light
\head{文字範囲の代入/取得テスト}
-\ltjdefcharrange{2}{`あ,"E0-"FF}
-「\char"F4」は2番の文字範囲なので,和文扱いのはず
+\ltjdefcharrange{9}{`あ,"E0-"FF}
+「\char"F4」は9番の文字範囲なので,和文扱いのはず
+
+{iso8859-1 和文扱い:\ltjsetparameter{jacharrange={1,8}}%
+\ltjgetparameter{jacharrange}{1}%
+§ ¶ ° £ ¥ \char"F4}
-{iso8859-1 和文扱い:\ltjsetparameter{jacharrange={1}}%
+{iso8859-1 欧文扱い:\ltjsetparameter{jacharrange={-1,-8}}%
\ltjgetparameter{jacharrange}{1}%
§ ¶ ° £ ¥ \char"F4}
-{iso8859-1 欧文扱い:\ltjsetparameter{jacharrange={-1}}%
+{標準:%
\ltjgetparameter{jacharrange}{1}%
§ ¶ ° £ ¥ \char"F4}
\ltjgetparameter{jacharrange}{2}
\head{文字コード→文字範囲}
-\ltjgetparameter{chartorange}{`い} % must be 217
-\ltjgetparameter{chartorange}{`§} % must be 1
-\ltjgetparameter{chartorange}{"F7} % must be 2
+\ltjgetparameter{chartorange}{`い} % must be 6
+\ltjgetparameter{chartorange}{`§} % must be 8
+\ltjgetparameter{chartorange}{"F7} % must be 9
\ltjgetparameter{chartorange}{-1} % must be error "
\medskip
あいうえおさしすせそ}\par
-\vfill\eject
+\vfill\eject\tracingonline=0
\noindent{\bf\gt 以下はJFMグルー挿入検証}
\jfont\rmlh={psft:Ryumin-Light:jfm=test} at 10pt
\jfont\sixgt={psft:GothicBBB-Medium:jfm=ujis} at 6pt
\def\dumplist#1{\par\noindent\leavevmode
\hbox to 0.2\hsize{\copy#1\hss}%
\vbox{\hsize=0.6\hsize\sixtt\baselineskip=7.2pt\sixgt\let\\=\relax
-\directlua{ltj.ext_show_node_list(tex.getbox(#1).head, '\\par ', tex.print)}\hrule}}
+\directlua{luatexja.ext_show_node_list(tex.getbox(#1).head, '\\par ', tex.print)}\hrule}}
%\tracingonline=1\tracingoutput=1\showboxdepth=3\showboxbreadth=100
\noindent{\gt\bf [x]kanjiskipの挿入}
\head{kanjiskip from JFM, autospacing (JA--JA)}
-\setbox0=\hbox{あ\rmlh あ}\dumplist0
+\setbox0=\hbox{\rmlh ああ}\dumplist0
{\ltjsetparameter{kanjiskip=\maxdimen}
-\setbox0=\hbox{あ\rmlh あ}\dumplist0
+\setbox0=\hbox{\rmlh ああ}\dumplist0
\jfont\rmlk={psft:Ryumin-Light:jfm=test} at 12pt
\setbox0=\hbox{\rmlk は\rmlh あ}\dumplist0}
\def\naspc{\ltjsetparameter{autospacing=false}\relax}
\def\naxspc{\ltjsetparameter{autoxspacing=false}\relax}
-\setbox0=\hbox{あ\naspc ああ}\dumplist0
+\setbox0=\hbox{\rmlh あ\naspc ああ}\dumplist0
\head{kanjiskip from JFM/autoxspacing (JA--EN)}
\setbox0=\hbox{\rmlh まx}\dumplist0
\setbox0=\hbox{あ\hbox{(}あ\setbox3=\hbox{(}\unhbox3あ}
\dumplist0}
+\vfill\eject
+\noindent{\gt\bf paragraph, hbox and math boundary}
+
+\setbox1=\vbox{\parindent19.2pt \rmlh\hsize=100pt\parfillskip=30pt
+かエ\par\global\setbox0=\lastbox}
+\dumplist0
+
+\setbox1=\vbox{\noindent\rmlh\hsize=100pt\parfillskip=30pt
+かエ\par\global\setbox0=\lastbox}
+\dumplist0
+
+\setbox0=\hbox{\rmlh かエ}
+\dumplist0
+
+\setbox0=\hbox{\rmlh あ$a$さ$a$か}
+\dumplist0
+\head{その他: unhbox の連続}
+\setbox0=\hbox{\tenmin\setbox1=\hbox{)}\setbox2=\hbox{a}\unhbox1\unhbox2}
+\dumplist0
+
+\setbox3=\hbox{\tenmin\setbox1=\hbox{)}\setbox2=\hbox{a}\unhbox1\unhbox2}
+\setbox0=\hbox{\unhbox3}
+\dumplist0
+
+\setbox0=\hbox{\tenmin\setbox1=\hbox{()}\setbox2=\hbox{「」}%
+ \unhcopy1\unhbox1\unhbox2}
+\dumplist0
+
+\head{その他: 「前由来」「後由来」JFM由来グルー}
+\setbox0=\hbox{\tenmin あ\fivemin (}
+\dumplist0
+
+\setbox0=\hbox{\fivemin あ\tenmin (}
+\dumplist0
+
+\setbox0=\hbox{\fivemin .\tenmin ・}
+\dumplist0
+
+\setbox0=\hbox{\tenmin .\fivemin ・}
+\dumplist0
\end