[dev-context] spac-ali.mkiv

[Wolfgang Schuster]

Hi,

-\unexpanded\def\ibox#1#2#3%
+\unexpanded\def\ibox
  {\vbox\bgroup
 \forgetall
 \let\\=\endgraf
 \ifdoublesided\signalinnerrealign\fi
 
\doifelserightpage\spac_align_set_horizontal_right\spac_align_set_horizontal_left

 \let\next}

-\unexpanded\def\obox#1#2#3%
+\unexpanded\def\obox
  {\vbox\bgroup
 \forgetall
 \let\\=\endgraf
 \ifdoublesided\signalouterrealign\fi
 
\doifelserightpage\c_spac_align_state_horizontal_left\spac_align_set_horizontal_right

 \let\next}

Wolfgang
___
dev-context mailing list
dev-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/dev-context

[dev-context] spac-ali.mkiv

[Wolfgang Schuster]

Hi,

the \begingroup and \endgroup commands are not possible here because they are 
the delimiters for the \hbox.

\def\doalignline#1#2% \\ == newline
  {\noindentation  % was \noindent
   \dontleavehmode % added in marrakesch at TUG 2006\begingroup
   \begingroup
   \setlocalhsize % new
-  \def\\{\endgroup\par\doalignline{#1}{#2}\begingroup}%
+  \def\\{\egroup\par\doalignline{#1}{#2}\bgroup}%
   \dowithnextbox
 {\hbox to \localhsize
{\ifcase\alignstrutmode\or\strut\fi
 \the\everyleftofalignedline
 #1\unhbox\nextbox#2\relax
 \the\everyrightofalignedline}%
  \endgroup}
 \hbox}

\def\doxalignline#1#2#3#4#5#6%
  {\noindentation  % was \noindent
   \dontleavehmode % added in marrakesch at TUG 2006\begingroup
   \begingroup
   \setlocalhsize
-  \def\\{\endgroup\par\doxalignline#1#2#3#4#5#6\begingroup}% inefficient
+  \def\\{\egroup\par\doxalignline#1#2#3#4#5#6\bgroup}% inefficient
   \dowithnextbox
 {\hbox to \localhsize
{#1\hskip\ifdone#2\else#3\fi#4%
 \hbox to \localhsize
   {\the\everyleftofalignedline
\ifcase\alignstrutmode\or\strut\fi
\ifdone#5\unhbox\nextbox#6\else#6\unhbox\nextbox#5\fi
\the\everyrightofalignedline}%
 \hss}%
\endgroup}
 \hbox}

Wolfgang
___
dev-context mailing list
dev-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/dev-context

[dev-context] spac-ali.mkiv

[Wolfgang Schuster]

Hi,

these two options can be removed because MkIV has no \enablespacehandling and 
\enablekernhandling commands.

\setvalue{\??aligncommand\v!spacing
}{\t_spac_align_collected\expandafter{\the\t_spac_align_collected\enablespacehandling
 \enablekernhandling }}
\setvalue{\??aligncommand\v!nospacing  
}{\t_spac_align_collected\expandafter{\the\t_spac_align_collected\disablespacehandling\disablekernhandling}}

Wolfgang
___
dev-context mailing list
dev-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/dev-context

[dev-context] spac-ali.mkiv

[Wolfgang Schuster]

Hi,

\unexpanded\def\usealignparameter#1% faster local variant
  {\edef\m_spac_align{#1\c!align}%
-  \ifx\m_spac_align\else
+  \ifx\m_spac_align\empty\else
 
\expandafter\let\expandafter\raggedcommand\csname\??alignmentnormalcache\m_spac_align\endcsname
 \ifx\raggedcommand\relax
   \spac_align_add_to_cache\m_spac_align
 \else
   
\expandafter\let\expandafter\updateraggedskips\csname\??alignmentraggedcache\m_spac_align\endcsname
 \fi
 \raggedcommand
   \fi}

Wolfgang
___
dev-context mailing list
dev-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/dev-context

[dev-context] spac-ali.mkiv

[Wolfgang Schuster]

Missind do’s:

\def\dosetraggedvbox#1% can be more keys
  {\let\raggedbox\vbox
-  \processcommacommand[#1]\dosetraggedvbox}
+  \processcommacommand[#1]\dodosetraggedvbox}

\def\dosetraggedhbox#1% can be more keys
  {\let\raggedbox\hbox
-  \processcommacommand[#1]\dosetraggedhbox}
+  \processcommacommand[#1]\dodosetraggedhbox}

-\def\dosetraggedvbox#1%
+\def\dodosetraggedvbox#1%
  {\ifcsname\@@ragged@@vbox#1\endcsname
 \csname\@@ragged@@vbox#1\endcsname
 \quitcommalist
   \fi}

-\def\dosetraggedhbox#1%
+\def\dodosetraggedhbox#1%
  {\ifcsname\@@ragged@@hbox#1\endcsname
 \csname\@@ragged@@hbox#1\endcsname
 \quitcommalist
   \fi}

Wolfgang

___
dev-context mailing list
dev-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/dev-context

[dev-context] spac-ali.mkiv

[Wolfgang Schuster]

Hi,

the \setraggedparagraphmode command miss a few \expandafter

% \def\setraggedparagraphmode
%   {\doifrightpageelse
%  {\ifdoublesided\signalinnerrealign\firstoftwoarguments \fi}
%  {\ifdoublesided\signalouterrealign\secondoftwoarguments\fi}}

\def\setraggedparagraphmode
  {\doifrightpageelse
 {\ifdoublesided\signalinnerrealign\expandafter\firstoftwoarguments \fi}
 {\ifdoublesided\signalouterrealign\expandafter\secondoftwoarguments\fi}}

Wolfgang

___
dev-context mailing list
dev-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/dev-context