diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/base/mkiv/buff-ini.mkiv')
-rw-r--r-- | Master/texmf-dist/tex/context/base/mkiv/buff-ini.mkiv | 46 |
1 files changed, 30 insertions, 16 deletions
diff --git a/Master/texmf-dist/tex/context/base/mkiv/buff-ini.mkiv b/Master/texmf-dist/tex/context/base/mkiv/buff-ini.mkiv index 145f0f39245..1a5ce459103 100644 --- a/Master/texmf-dist/tex/context/base/mkiv/buff-ini.mkiv +++ b/Master/texmf-dist/tex/context/base/mkiv/buff-ini.mkiv @@ -44,18 +44,8 @@ % \def\buff_start_indeed#1#2#3#4#5% \donothing needed ! #5=undent) % {\normalexpanded{\buff_pickup{#2}{#3}{#4}{}{\buff_stop{#4}}\plusone}} -% \def\buff_start_indeed#1#2#3#4% -% {\normalexpanded{\buff_pickup{#2}{#3}{#4}{}{\buff_stop{#4}}\plusone}} - \def\buff_start_indeed#1#2#3#4% - {\edef\p_strip{\namedbufferparameter{#1}\c!strip}% for aditya - \normalexpanded{\buff_pickup - {#2}% - {#3}% - {#4}% - {}% - {\buff_stop{#4}}% - \ifx\p_strip\v!no\zerocount\else\plusone\fi}} + {\normalexpanded{\buff_pickup{#2}{#3}{#4}{}{\buff_stop{#4}}\plusone}} \unexpanded\def\grabbufferdata % was: \dostartbuffer {\begingroup % (4) @@ -165,7 +155,7 @@ \setexpandedbufferparameter\c!number{\number\c_buff_n_of_defined}% \edef\currentdefinedbuffer{def-\number\c_buff_n_of_defined}% \setuevalue{\e!start\currentbuffer}{\buff_start_defined{\currentbuffer}{\currentdefinedbuffer}{\e!start\currentbuffer}{\e!stop\currentbuffer}}% - \setuevalue{\e!get \currentbuffer}{\buff_get_stored {\currentbuffer}{\currentdefinedbuffer}}% + \setuevalue{\e!get\currentbuffer }{\buff_get_stored{\currentbuffer}{\currentdefinedbuffer}}% \to \everydefinebuffer \unexpanded\def\buff_start_defined @@ -179,16 +169,16 @@ {\dosingleempty\buff_get} \unexpanded\def\buff_get[#1]% [name] - {\namedbufferparameter\empty\c!before\relax + {\namedbufferparameter\empty\c!before \doifelsenothing{#1} {\buff_get_stored_indeed\empty} {\processcommalist[#1]\buff_get_stored_indeed}% - \namedbufferparameter\empty\c!after\relax} + \namedbufferparameter\empty\c!after} \unexpanded\def\buff_get_stored#1#2% - {\namedbufferparameter{#1}\c!before\relax + {\namedbufferparameter{#1}\c!before \buff_get_stored_indeed{#2}% - \namedbufferparameter{#1}\c!after\relax} + \namedbufferparameter{#1}\c!after} \unexpanded\def\buff_get_stored_indeed#1% {\clf_getbuffer{#1}} @@ -284,4 +274,28 @@ \def\getbufferdata[#1]{\buff_get_stored_indeed{#1}} +%D This is a weird one, moved from cont-new. Do we really need it? If not +%D it will go away. + +\bgroup \permitcircumflexescape + +\obeylines % don't remove %'s ! + +\gdef\collapsedspace#1% + {\ifx#1^^M% + \expandafter\collapsedspace + \else + \space + \expandafter#1% + \fi} + +\unexpanded\gdef\collapsespaces + {\prependtoksonce\relax\to\everyeof% + \ignorelines% + \ignoretabs% + \let\obeyedspace\collapsedspace% + \obeyspaces} + +\egroup + \protect \endinput |