X-Git-Url: https://git.distorted.org.uk/~mdw/mdwtools/blobdiff_plain/7abe48b330ad6415f41b6b0e119645d578d0ebbe..39bf771aebd339019d1f11c0c0f60d30aab4ddc4:/mdwtab.dtx diff --git a/mdwtab.dtx b/mdwtab.dtx index 1da6f98..6d5cfcf 100644 --- a/mdwtab.dtx +++ b/mdwtab.dtx @@ -1,33 +1,11 @@ % \begin{meta-comment} % -% $Id: mdwtab.dtx,v 1.2 2003/09/05 16:15:03 mdw Exp $ +% $Id: mdwtab.dtx,v 1.3 2003/11/10 14:43:48 mdw Exp $ % % Another rewrite of the tabular environment, and maths alignments % % (c) 1996 Mark Wooding % -%----- Revision history ----------------------------------------------------- -% -% $Log: mdwtab.dtx,v $ -% Revision 1.2 2003/09/05 16:15:03 mdw -% Colour support! Better rule attribute handling. Lots of new hooks. -% -% Revision 1.1 2002/02/03 20:49:03 mdw -% Checkin for new build system. -% -% Revision 1.8 1996/12/09 23:20:42 mdw -% (\tab@setstrut): Fixed so that it uses \dimen@ii for the strut depth, -% as advertised. -% -% Revision 1.7 1996/11/29 21:59:16 mdw -% Fixed a little formatting mistake in a syntax diagram, and switched over -% to the new syntax diagram commands on the grounds that they're slightly -% less messy. Maybe. -% -% Revision 1.6 1996/11/19 20:54:33 mdw -% Entered into RCS -% -% % \end{meta-comment} % % \begin{meta-comment} @@ -66,7 +44,7 @@ %<+color> [2003/08/24 1.10 Fix for people who can't spell] % \end{meta-comment} % -% \CheckSum{3371} +% \CheckSum{3404} %% \CharacterTable %% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z %% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z @@ -2736,7 +2714,7 @@ \coldef <#1{\tabuserposttype{#1}} \coldef ?#1#2{% \ifx>#1\expandafter\tabuserpretype% - \else\expandafter\tabusrposttype\fi% + \else\expandafter\tabuserposttype\fi% {#2}% \tab@append\tab@shortline{#2}% } @@ -2877,7 +2855,11 @@ \tab@initread% \def\tab@multicol{\@arstrut}% \tab@preamble{\tab@multicol}% - \def\tab@midtext{\ignorespaces\@sharp\@sharp\@maybe@unskip}% + \let\tab@lefttext\tab@lefttexthook% + \let\tab@righttext\tab@righttexthook% + \let\tab@leftruletext\tab@leftruletexthook% + \let\tab@rightruletext\tab@rightruletexthook% + \def\tab@midtext{\tab@setcr\ignorespaces\@sharp\@sharp\@maybe@unskip}% \tab@readpreamble{#1}% \gdef\@preamble{\the\tab@preamble}% \let\tab@bgroup\begingroup% @@ -5508,6 +5490,7 @@ \dsp@end% \global\let\eqa@number\eqa@oldnumber% \global\advance\c@equation\m@ne% + \global\@ignoretrue% } \expandafter\let\csname endspliteqn*\endcsname\endspliteqn % \end{macrocode} @@ -5598,9 +5581,13 @@ % we need to remove them by hand at the extremities of the environment. % % \begin{macrocode} -\def\subsplit{% +\def\subsplit{\@ifnextchar[\subsplit@i{\subsplit@i[c]}} +\def\subsplit@i[#1]{% + \let\@tempa\vcenter% + \if#1t\let\@tempa\vtop\fi% + \if#1b\let\@tempa\vbox\fi% \let\\\seq@cr% - \vcenter\bgroup% + \@tempa\bgroup% \seq@dosplit{\hfil\qquad$##$\qquad\hfil}{\hfilneg\hskip-2em}% } % \end{macrocode}