% 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 24.1.17.1, p. III-301. % Original source in file "macros4.TEX", starting line 1003. \wlog{L: "reverses.tip" ["macros4.TEX," l. 1003, p. III-301]}% % This file DOES belong to format "texip." \InputD{showx.tip} \catcode`\@ = 11 \def\ReverseString #1#2{% \def\@ReverseStringName{#1}% \def\@ReversedString{}% \edef\@ReverseTemp{#2}% \ShowX\@ReverseTemp \expandafter\@ReverseString\@ReverseTemp\@Del } \def\@ReverseString #1{% \ifx #1\@Del \expandafter\edef\@ReverseStringName{\@ReversedString}% \let\@ReverseStringNext = \relax \else \edef\@ReversedString{#1\@ReversedString}% \let\@ReverseStringNext = \@ReverseString \def\@ReverseStringNext{\@ReverseString}% \fi \@ReverseStringNext } \catcode`\@ = 12