Skip to content

R
riscv-gcc-1
Commit 9552c38e by Karl Berry
Options

(\uref): Write real definition, taking one mandatory argument and one 

optional one.

From-SVN: r14153
parent 913db40d
Showing with 17 additions and 5 deletions
gcc/texinfo.tex
%% TeX macros to handle Texinfo files. %% TeX macros to handle Texinfo files.
%% $Id: texinfo.tex,v 2.202 1997/06/04 21:46:06 karl Exp $ %% $Id: texinfo.tex,v 2.202 1997/06/04 21:47:40 karl Exp karl $
% Copyright (C) 1985, 86, 88, 90, 91, 92, 93, % Copyright (C) 1985, 86, 88, 90, 91, 92, 93,
% 94, 95, 96, 97 Free Software Foundation, Inc. % 94, 95, 96, 97 Free Software Foundation, Inc.
...@@ -36,7 +36,7 @@ ...@@ -36,7 +36,7 @@
% This automatically updates the version number based on RCS. % This automatically updates the version number based on RCS.
\def\deftexinfoversion$#1: #2 ${\def\texinfoversion{#2}} \def\deftexinfoversion$#1: #2 ${\def\texinfoversion{#2}}
\deftexinfoversion$Revision: 2.200 $ \deftexinfoversion$Revision: 2.202 $
\message{Loading texinfo package [Version \texinfoversion]:} \message{Loading texinfo package [Version \texinfoversion]:}
% If in a .fmt file, print the version number % If in a .fmt file, print the version number
...@@ -1338,13 +1338,25 @@ where each line of input produces a line of output.} ...@@ -1338,13 +1338,25 @@ where each line of input produces a line of output.}
\else{\tclose{\ttsl\look}}\fi \else{\tclose{\ttsl\look}}\fi
\else{\tclose{\ttsl\look}}\fi} \else{\tclose{\ttsl\look}}\fi}
% @url, @uref, @email. Quotes do not seem necessary. % @url, @email. Quotes do not seem necessary.
\let\url=\code % perhaps include a hypertex \special eventually \let\url=\code % perhaps include a hypertex \special eventually
\let\uref=\code
% rms does not like the angle brackets --karl, 17may97. % rms does not like the angle brackets --karl, 17may97.
%\def\email#1{$\langle${\tt #1}$\rangle$} %\def\email#1{$\langle${\tt #1}$\rangle$}
\let\email=\code \let\email=\code
% @uref (abbreviation for `urlref') takes an optional second argument
% specifying the text to display. First (mandatory) arg is the url.
%
\def\uref#1{\urefxxx #1,,\finish}
\def\urefxxx#1,#2,#3\finish{%
\setbox0 = \hbox{\ignorespaces #2}%
\ifdim\wd0 > 0pt
\unhbox0\ (\code{#1})%
\else
\code{#1}%
\fi
}
% Check if we are currently using a typewriter font. Since all the % Check if we are currently using a typewriter font. Since all the
% Computer Modern typewriter fonts have zero interword stretch (and % Computer Modern typewriter fonts have zero interword stretch (and
% shrink), and it is reasonable to expect all typewriter fonts to have % shrink), and it is reasonable to expect all typewriter fonts to have
...@@ -2089,7 +2101,7 @@ July\or August\or September\or October\or November\or December\fi ...@@ -2089,7 +2101,7 @@ July\or August\or September\or October\or November\or December\fi
\global\colcount=0\relax}} \global\colcount=0\relax}}
} }
\def\setmultitablespacing{% test to see if user has set \multitablelinespace. \def\setultitablespacing{% test to see if user has set \multitablelinespace.
% If so, do nothing. If not, give it an appropriate dimension based on % If so, do nothing. If not, give it an appropriate dimension based on
% current baselineskip. % current baselineskip.
\ifdim\multitablelinespace=0pt \ifdim\multitablelinespace=0pt
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment