summaryrefslogtreecommitdiff
path: root/tex/context/base/mkxl/page-col.mkxl
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/mkxl/page-col.mkxl')
-rw-r--r--tex/context/base/mkxl/page-col.mkxl18
1 files changed, 8 insertions, 10 deletions
diff --git a/tex/context/base/mkxl/page-col.mkxl b/tex/context/base/mkxl/page-col.mkxl
index 43330c9a7..c2598afc1 100644
--- a/tex/context/base/mkxl/page-col.mkxl
+++ b/tex/context/base/mkxl/page-col.mkxl
@@ -24,17 +24,15 @@
%D We reserve a counter for the number of columns as well as the current
%D column. Both are not to be changed by users!
-%newcount\nofcolumns \nofcolumns\plusone % already in core-ini.mkiv
-\newcount\mofcolumns \mofcolumns\plusone
-
-\newconstant\columndirection % 0:lr 1:rl
+%newinteger \nofcolumns \nofcolumns\plusone % already in core-ini.mkiv
+\newinteger \mofcolumns \mofcolumns\plusone
+\newdimension \columnwidth
+\newdimension \columndistance
+\newconstant \columndirection % 0:lr 1:rl
\setnewconstant\maxnofcolumns 50
\setnewconstant\allocatednofcolumns 0
-\newdimen\columnwidth
-\newdimen\columndistance
-
%D During initialization the temporary boxes are allocated. This enables us to
%D use as much columns as we want, without exhausting the pool of boxes too
%D fast. We could have packed them in one box, but we've got enough boxes.
@@ -125,7 +123,7 @@
\fi}
\protected\def\page_columns_all_next
- {\advance\mofcolumns\plusone
+ {\advanceby\mofcolumns\plusone
\edef\currentcolumn{\the\mofcolumns}%
\page_columns_action\relax
\ifnum\mofcolumns<\nofcolumns
@@ -141,7 +139,7 @@
\fi}
\protected\def\page_columns_rev_prev
- {\advance\mofcolumns\minusone
+ {\advanceby\mofcolumns\minusone
\edef\currentcolumn{\the\mofcolumns}%
\page_columns_action\relax
\ifnum\mofcolumns>\plusone
@@ -157,7 +155,7 @@
\protected\def\page_columns_mid_next
{\edef\currentcolumn{\the\mofcolumns}%
\page_columns_action\relax
- \advance\mofcolumns\plusone
+ \advanceby\mofcolumns\plusone
\ifnum\mofcolumns<\nofcolumns
\expandafter\page_columns_mid_next
\fi}