diff options
Diffstat (limited to 'tex/context/base/supp-vis.mkiv')
-rw-r--r-- | tex/context/base/supp-vis.mkiv | 185 |
1 files changed, 93 insertions, 92 deletions
diff --git a/tex/context/base/supp-vis.mkiv b/tex/context/base/supp-vis.mkiv index de7c4288d..1b0253162 100644 --- a/tex/context/base/supp-vis.mkiv +++ b/tex/context/base/supp-vis.mkiv @@ -96,7 +96,8 @@ %D off with \type{\dontinterfere}. \unexpanded\def\dontinterfere % or maybe just forgetall - {\reseteverypar + {\everypar \emptytoks + \let\par \endgraf \parindent\zeropoint \parskip \zeropoint \leftskip \zeropoint @@ -185,12 +186,12 @@ %D offers \type{\hfilneg} and \type{\vfilneg}, we define our %D own alternative double \type{ll}'ed ones. -\def\hfilneg {\normalhskip\zeropoint\s!plus-1\s!fil\relax} -\def\vfilneg {\normalvskip\zeropoint\s!plus-1\s!fil\relax} -\def\hfillneg {\normalhskip\zeropoint\s!plus-1\s!fill\relax} -\def\vfillneg {\normalvskip\zeropoint\s!plus-1\s!fill\relax} -\def\hfilllneg{\normalhskip\zeropoint\s!plus-1\s!filll\relax} -\def\vfilllneg{\normalvskip\zeropoint\s!plus-1\s!filll\relax} +\def\hfilneg {\normalhskip\zeropoint\!!plus-1fil\relax} +\def\vfilneg {\normalvskip\zeropoint\!!plus-1fil\relax} +\def\hfillneg {\normalhskip\zeropoint\!!plus-1fill\relax} +\def\vfillneg {\normalvskip\zeropoint\!!plus-1fill\relax} +\def\hfilllneg{\normalhskip\zeropoint\!!plus-1filll\relax} +\def\vfilllneg{\normalvskip\zeropoint\!!plus-1filll\relax} %D \macros %D {normalhss,normalhfil,normalhfill, @@ -322,14 +323,14 @@ {\dontcomplain \normaloffinterlineskip \visualhrule - \s!height\boxrulewidth - \iftoprule\else\s!width\zeropoint\fi + \!!height\boxrulewidth + \iftoprule\else\!!width\zeropoint\fi \normalvskip-\boxrulewidth \normalhbox to \boxrulewd {\visualvrule - \s!height\boxruleht - \s!depth \boxruledp - \s!width \ifleftrule\boxrulewidth\else\zeropoint\fi + \!!height\boxruleht + \!!depth \boxruledp + \!!width \ifleftrule\boxrulewidth\else\zeropoint\fi \ifdim\boxruleht>\zeropoint \else \baselinerulefalse \fi \ifdim\boxruledp>\zeropoint \else \baselinerulefalse \fi \ifbaselinerule @@ -339,23 +340,23 @@ \cleaders \ifbaselinefill \visualhrule - \s!height\boxrulewidth + \!!height\boxrulewidth \else \normalhbox {\normalhskip2.5\boxrulewidth \visualvrule - \s!height\boxrulewidth - \s!width5\boxrulewidth + \!!height\boxrulewidth + \!!width5\boxrulewidth \normalhskip2.5\boxrulewidth}% \fi \fi \normalhfill \visualvrule - \s!width\ifrightrule\boxrulewidth\else\zeropoint\fi}% + \!!width\ifrightrule\boxrulewidth\else\zeropoint\fi}% \normalvskip-\boxrulewidth \visualhrule - \s!height\boxrulewidth - \ifbottomrule\else\s!width\zeropoint\fi}% + \!!height\boxrulewidth + \ifbottomrule\else\!!width\zeropoint\fi}% \wd#1\zeropoint \setbox#1=\ifhbox#1\normalhbox\else\normalvbox\fi {\normalhbox @@ -725,9 +726,9 @@ \def\setvisiblehfilbox#1\to#2#3#4% {\setbox#1\normalhbox {\visualvrule - \s!width #2\testrulewidth - \s!height#3\testrulewidth - \s!depth #4\testrulewidth}% + \!!width #2\testrulewidth + \!!height#3\testrulewidth + \!!depth #4\testrulewidth}% \smashbox#1} \def\doruledhfiller#1#2#3#4% @@ -826,9 +827,9 @@ \def\setvisiblevfilbox#1\to#2#3#4% {\setbox#1\normalhbox {\visualvrule - \s!width #2\testrulewidth - \s!height#3\testrulewidth - \s!depth #4\testrulewidth}% + \!!width #2\testrulewidth + \!!height#3\testrulewidth + \!!depth #4\testrulewidth}% \smashbox#1}% \def\doruledvfiller#1#2#3% @@ -939,22 +940,22 @@ \setbox0\normalhbox {\normalhskip-\testrulewidth \visualvrule - \s!width4\testrulewidth - \s!height16\testrulewidth - \s!depth16\testrulewidth}% + \!!width4\testrulewidth + \!!height16\testrulewidth + \!!depth16\testrulewidth}% \else \setbox0\normalhbox to \ifnegative-\fi\scratchskip {\visualvrule - \s!width2\testrulewidth - \ifnegative\s!depth\else\s!height\fi16\testrulewidth + \!!width2\testrulewidth + \ifnegative\!!depth\else\!!height\fi16\testrulewidth \cleaders \visualhrule \ifnegative - \s!depth2\testrulewidth - \s!height\zeropoint + \!!depth2\testrulewidth + \!!height\zeropoint \else - \s!height2\testrulewidth - \s!depth\zeropoint + \!!height2\testrulewidth + \!!depth\zeropoint \fi \normalhfill \ifflexible @@ -964,15 +965,15 @@ \normalhbox {\normalhskip 2\testrulewidth \visualvrule - \s!width2\testrulewidth - \s!height\ifnegative-7\else9\fi\testrulewidth - \s!depth\ifnegative9\else-7\fi\testrulewidth + \!!width2\testrulewidth + \!!height\ifnegative-7\else9\fi\testrulewidth + \!!depth\ifnegative9\else-7\fi\testrulewidth \normalhskip 2\testrulewidth}% \normalhfill \fi \visualvrule - \s!width2\testrulewidth - \ifnegative\s!depth\else\s!height\fi16\testrulewidth}% + \!!width2\testrulewidth + \ifnegative\!!depth\else\!!height\fi16\testrulewidth}% \setbox0\normalhbox {\ifnegative\else\normalhskip-\scratchskip\fi \box0}% @@ -1075,14 +1076,14 @@ \ifzero \setbox0\normalvcue {\visualvrule - \s!width32\testrulewidth - \s!height2\testrulewidth - \s!depth2\testrulewidth}% + \!!width32\testrulewidth + \!!height2\testrulewidth + \!!depth2\testrulewidth}% \else \setbox0\normalvbox to \ifnegative-\fi\scratchskip {\visualhrule - \s!width16\testrulewidth - \s!height2\testrulewidth + \!!width16\testrulewidth + \!!height2\testrulewidth \ifflexible \cleaders \normalhbox to 16\testrulewidth @@ -1090,8 +1091,8 @@ \normalvbox {\normalvskip 2\testrulewidth \visualhrule - \s!width2\testrulewidth - \s!height2\testrulewidth + \!!width2\testrulewidth + \!!height2\testrulewidth \normalvskip 2\testrulewidth}% \normalhss}% \normalvfill @@ -1099,12 +1100,12 @@ \normalvfill \fi \visualhrule - \s!width16\testrulewidth - \s!height2\testrulewidth}% + \!!width16\testrulewidth + \!!height2\testrulewidth}% \setbox2\normalvbox to \ht0 {\visualhrule - \s!width2\testrulewidth - \s!height\ht0}% + \!!width2\testrulewidth + \!!height\ht0}% \ifnegative \ht0\zeropoint \setbox0\normalhbox @@ -1191,25 +1192,25 @@ \ifzero \setbox0\ruledhbox to 8\testrulewidth {\visualvrule - \s!width\zeropoint - \s!height16\testrulewidth - \s!depth16\testrulewidth}% + \!!width\zeropoint + \!!height16\testrulewidth + \!!depth16\testrulewidth}% \setbox0\normalhbox {\normalhskip-4\testrulewidth\box0}% \else \setbox0\ruledhbox to \ifnegative-\fi\scratchskip {\visualvrule - \s!width\zeropoint - \ifnegative\s!depth\else\s!height\fi16\testrulewidth + \!!width\zeropoint + \ifnegative\!!depth\else\!!height\fi16\testrulewidth \ifflexible \normalhskip2\testrulewidth \cleaders \normalhbox {\normalhskip 2\testrulewidth \visualvrule - \s!width2\testrulewidth - \s!height\ifnegative-7\else9\fi\testrulewidth - \s!depth\ifnegative9\else-7\fi\testrulewidth + \!!width2\testrulewidth + \!!height\ifnegative-7\else9\fi\testrulewidth + \!!depth\ifnegative9\else-7\fi\testrulewidth \normalhskip 2\testrulewidth}% \normalhfill \else @@ -1267,9 +1268,9 @@ \ifzero \setbox0\ruledhbox to 32\testrulewidth {\visualvrule - \s!width\zeropoint - \s!height4\testrulewidth - \s!depth4\testrulewidth}% + \!!width\zeropoint + \!!height4\testrulewidth + \!!depth4\testrulewidth}% \else \setbox0\ruledvbox to \ifnegative-\fi\scratchskip {\hsize16\testrulewidth @@ -1280,15 +1281,15 @@ \normalvbox {\normalvskip 2\testrulewidth \visualhrule - \s!width2\testrulewidth - \s!height2\testrulewidth + \!!width2\testrulewidth + \!!height2\testrulewidth \normalvskip 2\testrulewidth}% \normalhss}% \normalvfill \else \visualvrule - \s!width\zeropoint - \s!height\ifnegative-\fi\scratchskip + \!!width\zeropoint + \!!height\ifnegative-\fi\scratchskip \normalhfill \fi} \fi @@ -1362,7 +1363,7 @@ \def\supp_visualizers_hglue_indeed {\leavevmode \scratchcounter\spacefactor - \visualvrule\s!width\zeropoint + \visualvrule\!!width\zeropoint \normalpenalty\plustenthousand \ruledhkern\normalhskip\scratchskip \spacefactor\scratchcounter @@ -1392,7 +1393,7 @@ \def\supp_visualizers_vglue_indeed {\endgraf % \par \nextdepth\prevdepth - \visualhrule\s!height\zeropoint + \visualhrule\!!height\zeropoint \normalpenalty\plustenthousand \ruledvkern\normalvskip\scratchskip \prevdepth\nextdepth @@ -1418,26 +1419,26 @@ {$\normalmkern\ifnegative-\fi\scratchskip$}% \setbox\boxrulescratchbox\normalhbox to \wd\boxrulescratchbox {\visualvrule - \s!height16\testrulewidth - \s!depth 16\testrulewidth - \s!width \testrulewidth + \!!height16\testrulewidth + \!!depth 16\testrulewidth + \!!width \testrulewidth \leaders \visualhrule - \s!height\ifpositive 16\else-14\fi\testrulewidth - \s!depth \ifpositive-14\else 16\fi\testrulewidth + \!!height\ifpositive 16\else-14\fi\testrulewidth + \!!depth \ifpositive-14\else 16\fi\testrulewidth \normalhfill \ifflexible \normalhskip-\wd\boxrulescratchbox \leaders \visualhrule - \s!height\testrulewidth - \s!depth \testrulewidth + \!!height\testrulewidth + \!!depth \testrulewidth \normalhfill \fi \visualvrule - \s!height16\testrulewidth - \s!depth 16\testrulewidth - \s!width \testrulewidth}% + \!!height16\testrulewidth + \!!depth 16\testrulewidth + \!!width \testrulewidth}% \smashbox0% \ifnegative #1\scratchskip @@ -1568,19 +1569,19 @@ \normalhskip-\scratchdimen \normalhskip-2\testrulewidth \visualvrule - \s!width 2\testrulewidth - \s!height#3\testrulewidth - \s!depth #4\testrulewidth + \!!width 2\testrulewidth + \!!height#3\testrulewidth + \!!depth #4\testrulewidth \fi \visualvrule - \s!width \scratchdimen - \s!height#5\testrulewidth - \s!depth #6\testrulewidth + \!!width \scratchdimen + \!!height#5\testrulewidth + \!!depth #6\testrulewidth \ifnum#2>\zerocount \visualvrule - \s!width 2\testrulewidth - \s!height#3\testrulewidth - \s!depth #4\testrulewidth + \!!width 2\testrulewidth + \!!height#3\testrulewidth + \!!depth #4\testrulewidth \fi \fi}% \smashbox#1} @@ -1599,8 +1600,8 @@ \setbox0\ruledhbox to 8\testrulewidth {\ifnegative\else\normalhss\fi \visualvrule - \s!depth8\testrulewidth - \s!width\ifzero\zeropoint\else4\testrulewidth\fi + \!!depth8\testrulewidth + \!!width\ifzero\zeropoint\else4\testrulewidth\fi \ifpositive\else\normalhss\fi}% \supp_visualizers_penalty_box{2}{\scratchcounter}{0}{8}{-3.5}{4.5}% \normalpenalty\plustenthousand @@ -1650,13 +1651,13 @@ \boxrulewidth\testrulewidth \setbox0\ruledhbox {\visualvrule - \s!height4\testrulewidth - \s!depth 4\testrulewidth - \s!width \zeropoint + \!!height4\testrulewidth + \!!depth 4\testrulewidth + \!!width \zeropoint \visualvrule - \s!height\ifnegative.5\else4\fi\testrulewidth + \!!height\ifnegative.5\else4\fi\testrulewidth \!!dept \ifpositive.5\else4\fi\testrulewidth - \s!width 8\testrulewidth}% + \!!width 8\testrulewidth}% \supp_visualizers_penalty_box{2}{\scratchcounter}{4}{4}{.5}{.5}% \setbox0\normalhbox {\normalhskip-4\testrulewidth |