summaryrefslogtreecommitdiff
path: root/tex/context/base/spac-par.mkiv
diff options
context:
space:
mode:
authorMarius <mariausol@gmail.com>2010-09-08 15:27:58 +0300
committerMarius <mariausol@gmail.com>2010-09-08 15:27:58 +0300
commit821d6141a92d80d6195b87fe1c25fb2fd83042d5 (patch)
tree53f8c98927a0435184c3ae40324cfdc996e8bd4a /tex/context/base/spac-par.mkiv
parent16895587e51f8243a7e4dc6185979894fb199d4f (diff)
downloadcontext-821d6141a92d80d6195b87fe1c25fb2fd83042d5.tar.gz
beta 2010.09.05 13:23
Diffstat (limited to 'tex/context/base/spac-par.mkiv')
-rw-r--r--tex/context/base/spac-par.mkiv18
1 files changed, 9 insertions, 9 deletions
diff --git a/tex/context/base/spac-par.mkiv b/tex/context/base/spac-par.mkiv
index 3477b1c1b..4093edcac 100644
--- a/tex/context/base/spac-par.mkiv
+++ b/tex/context/base/spac-par.mkiv
@@ -52,7 +52,7 @@
\newtoks\everynextparagraphintro
\newtoks\@@everyparagraphtoks
-\chardef\everyparagraphintro\zerocount
+\newconstant\everyparagraphintrostate
\unexpanded\def\setupparagraphintro
{\dodoubleempty\dosetupparagraphintro}
@@ -60,14 +60,14 @@
\def\dosetupparagraphintro[#1][#2]%
{\processallactionsinset
[#1]
- [ \v!reset=>\global\chardef\everyparagraphintro\zerocount
+ [ \v!reset=>\global\everyparagraphintrostate\zerocount
\global\everyfirstparagraphintro\emptytoks
\global\everynextparagraphintro \emptytoks,
- \v!first=>\global\chardef\everyparagraphintro\plusone
+ \v!first=>\global\everyparagraphintrostate\plusone
\doglobal\appendtoks#2\to\everyfirstparagraphintro,
- \v!next=>\ifcase\everyparagraphintro\global\chardef\everyparagraphintro\plusone\fi
+ \v!next=>\ifcase\everyparagraphintrostate\global\everyparagraphintrostate\plusone\fi
\doglobal\appendtoks#2\to\everynextparagraphintro,
- \v!each=>\ifcase\everyparagraphintro\global\chardef\everyparagraphintro\plustwo\fi
+ \v!each=>\ifcase\everyparagraphintrostate\global\everyparagraphintrostate\plustwo\fi
\doglobal\appendtoks#2\to\everyfirstparagraphintro
\doglobal\appendtoks#2\to\everynextparagraphintro]}
@@ -84,22 +84,22 @@
%D \stoptyping
\def\flushatparagraph#1%
- {\global\chardef\everyparagraphintro\plusone
+ {\global\everyparagraphintrostate\plusone
\global\appendtoks{#1}\to\everyfirstparagraphintro
\global\let\insertparagraphintro\doinsertparagraphintro}
\def\doinsertparagraphintro % can be merged with the next
- {\ifcase\everyparagraphintro\else\@EA\dodoinsertparagraphintro\fi}
+ {\ifcase\everyparagraphintrostate\else\@EA\dodoinsertparagraphintro\fi}
\def\dodoinsertparagraphintro
{\begingroup
\everypar\emptytoks
- \ifcase\everyparagraphintro\relax
+ \ifcase\everyparagraphintrostate\relax
% no data
\@@everyparagraphtoks\emptytoks
\or
% first data
- \global\chardef\everyparagraphintro\plustwo
+ \global\everyparagraphintrostate\plustwo
\@@everyparagraphtoks\everyfirstparagraphintro
\global\everyfirstparagraphintro\emptytoks
\or