diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-12 23:52:44 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-12 23:52:44 +0000 |
commit | 066db400ff9778b2633cf45c1920fd05a6a4d86d (patch) | |
tree | 412fce3d459f2e1c76cd13ea7fe37a2cd45de83e /Master/texmf-dist/tex/latex/cbcoptic/prnthyph.sty | |
parent | 48392e94c2677db718afb8e28a58d42e385a6019 (diff) |
cbcoptic
git-svn-id: svn://tug.org/texlive/trunk@740 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/cbcoptic/prnthyph.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/cbcoptic/prnthyph.sty | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/cbcoptic/prnthyph.sty b/Master/texmf-dist/tex/latex/cbcoptic/prnthyph.sty new file mode 100644 index 00000000000..6c3c554f394 --- /dev/null +++ b/Master/texmf-dist/tex/latex/cbcoptic/prnthyph.sty @@ -0,0 +1,35 @@ +% Dichiarazione per sostituire \showhyphens al fine di eseguire le +% prove necessarie per verificare i pattern di divisione in sillabe. +% +% Uso: +% \begingroup\printhyphens +% <lista di parole> +% \endgroup +% +% oppure: +% \begin{printhyphens} +% <lista di parole> +% \end{printhyphens} +% +% Riferimento: Victor Eijkout, ``The bag of tricks'', TUGboat 14.4 (1993) +% p.424 + +% +\def\printhyphens{\everypar{\setbox0\lastbox \setbox1\hbox{\strut}\vbox\bgroup +\everypar{\setbox0\lastbox \nobreak\hskip\z@\relax}\dimen0=\hsize +\hsize=\z@ \hfuzz\maxdimen \def\par{\endgraf \hsize=\dimen0\getlastline +\egroup\endgraf}}\offinterlineskip\breakafterword} + +\def\breakafterword{\catcode`\^^M\active\catcode`\ \active} + +{\breakafterword\gdef^^M{\par}\global\let ^^M} + +\def\getlastline{\setbox0\lastbox\ifvoid0\let\next\nomorelines +\else\unskip\unpenalty\setbox1\hbox{\unhbox0\strut\discretionary{}{}{}% +\unhbox1}\let\next\getlastline\fi\next} + +\def\nomorelines{\unhbox1} + +\endinput + + |