% This macro source file is from the four volume series
% "TeX in Practice" by Stephan von Bechtolsheim, published
% 1993 by Springer-Verlag, New York.
% Copyright 1993 Stephan von Bechtolsheim.
% No warranty or liability is assumed.
% This macro may be copied freely if no fees other than
% media cost or shipping charges are charged and as long
% as this copyright and the following source code itself
% is not changed. Please see the series for further information.
%
% Version: 1.0
% Date: May 1, 1993
%
%
% This source code is documented in 12.7.13, p. II-146.
% Original source in file "par3.TEX", starting line 1929.
\wlog{L: "prhyph.tip" ["par3.TEX," l. 1929, p. II-146]}%
% This file DOES belong to format "texip."
\InputD{shboxes.tip}
\def\PrintHyphens #1{%
   {%
       \setbox 0 = \vbox{%
           \pretolerance = -1
           \hyphenpenalty = -10000
           \hsize = 0pt
           \leftskip = 0pt
           \rightskip = 0pt
           \parfillskip = 0pt
           \parindent = 0pt
           \hfuzz = \maxdimen
           \interlinepenalty = 0
           \clubpenalty = 0
           \widowpenalty = 0
           \brokenpenalty = 0
           \hskip 0pt
           #1
       }%
       \setbox2 = \hbox{}%
       \setbox 9 = \vbox{%
           \unvbox 0
           \loop
               \unskip
               \setbox 1 = \lastbox
               \ifhbox 1
                   \global\setbox 2 = \hbox{%
                       \unhbox 1
                       \discretionary{}{}{}%
                       \unhbox 2
                   }%
           \repeat
       }%
       \unhbox 2
   }%
}