stable 2004.08.30

1 files changed, 86 insertions, 86 deletions

diff --git a/tex/context/base/core-tbl.tex b/tex/context/base/core-tbl.tex
index b796587c5..ed027a3db 100644
--- a/tex/context/base/core-tbl.tex
+++ b/tex/context/base/core-tbl.tex
@@ -1,6 +1,6 @@
 %D \module
 %D \module
-%D   [       file=core-tbl,
+%D   [       filefile=core-tbl,
 %D        version=1998.11.03,
 %D          title=\CONTEXT\ Core Macros,
 %D       subtitle=Text Flow Tabulation,
@@ -509,8 +509,8 @@
 \def\dogettabulatewidth(#1)%
   {\processallactionsinset
      [#1]%
-     [\v!passend=>\chardef\tabulatemodus\plusthree,
-         \v!vast=>\chardef\tabulatemodus\plusthree
+     [\v!fit=>\chardef\tabulatemodus\plusthree,
+         \v!fixed=>\chardef\tabulatemodus\plusthree
                   \tabulatenopbreaktrue,
       \s!unknown=>\tabulatewidth#1\relax]%
    \ifnum\tabulatedimen=\plusone
@@ -613,7 +613,7 @@
       \fi}}
 
 %D \startbuffer
-%D \starttabulatie[|c|p|p|]
+%D \starttabulate[|c|p|p|]
 %D \NC \bf Alpha \NC \bf Beta        \NC \bf Gamma          \NC\NR
 %D \NC 1         \NC right indeed    \NC definitely wrong   \NC\NR
 %D \NC 2         \NC \thinrules[n=3] \NC \thinrules[n=3]    \NC\NR
@@ -621,22 +621,22 @@
 %D \NC 4         \NC very true       \NC as false as can be \NC\NR
 %D \NC 5         \NC \thinrules[n=5] \NC \thinrules[n=5]    \NC\NR
 %D \NC 6         \NC \thinrules[n=3] \NC \thinrules[n=4]    \NC\NR
-%D \stoptabulatie
+%D \stoptabulate
 %D \stopbuffer
 %D
-%D \typebuffer {\tracetabulatetrue\haalbuffer}
+%D \typebuffer {\tracetabulatetrue\getbuffer}
 %D
 %D \startbuffer
-%D \starttabulatie[|c|p|p|]
+%D \starttabulate[|c|p|p|]
 %D \NC \bf Alpha \NC \bf Beta        \NC \bf Gamma          \NC\NR
 %D \NC 1         \NC right indeed    \NC definitely wrong   \NC\NR
 %D \NC 2         \NC oh yes          \NC simply no          \NC\NR
 %D \NC 3         \NC very true       \NC as false as can be \NC\NR
 %D \NC 4         \NC the whole truth \NC but the truth      \NC\NR
-%D \stoptabulatie
+%D \stoptabulate
 %D \stopbuffer
 %D
-%D \typebuffer {\tracetabulatetrue\haalbuffer}
+%D \typebuffer {\tracetabulatetrue\getbuffer}
 
 % \definetabulate
 % \redefinetabulate
@@ -648,21 +648,21 @@
 
 \def\dodefinetabulate[#1][#2][#3]%
   {\ifthirdargument
-     \doifundefined{\??tt#1::\c!eenheid}
+     \doifundefined{\??tt#1::\c!unit}
        {\copyparameters
           [\??tt#1::][\??tt\v!tabulate::]%
-          [\c!kader,\c!afstand,\c!eenheid,\c!voor,\c!korps,\c!na,
-           \c!binnen,\c!inspringen,\c!marge,\c!uitlijnen,\c!hoofd,\c!titel,
-           \c!lijnkleur,\c!lijndikte,\c!splitsen,EQ]}%
+          [\c!frame,\c!distance,\c!unit,\c!before,\c!bodyfont,\c!after,
+           \c!inner,\c!indenting,\c!margin,\c!align,\c!header,\c!title,
+           \c!rulecolor,\c!rulethickness,\c!split,EQ]}%
      \copyparameters
        [\??tt#1::#2][\??tt#1::]%
-       [\c!eenheid,\c!afstand,\c!voor,\c!korps,\c!na,
-        \c!binnen,\c!inspringen,\c!kader,\c!splitsen,\c!hoofd,\c!titel,
-        \c!marge,\c!uitlijnen,\c!lijnkleur,\c!lijndikte,EQ]%
+       [\c!unit,\c!distance,\c!before,\c!bodyfont,\c!after,
+        \c!inner,\c!indenting,\c!frame,\c!split,\c!header,\c!title,
+        \c!margin,\c!align,\c!rulecolor,\c!rulethickness,EQ]%
      \setvalue{\e!start#1::#2}{\dofinalstarttabulate[#1][#2][#3]}%
      \setvalue{\e!start#1}{\bgroup\dosubstarttabulate[#1]}%
-     \letvalue{\??tt#1-\v!hoofd}\empty
-     \letvalue{\??tt#1-\v!voet }\empty
+     \letvalue{\??tt#1-\v!header}\empty
+     \letvalue{\??tt#1-\v!footer }\empty
    \else\ifsecondargument
      \definetabulate[#1][][#2]%
    \else
@@ -674,21 +674,21 @@
 
 \newconditional\tabulatesomeamble
 
-\def\checkfulltabulatecontent % - needed, else confusion with \c!hoofd
-  {\ifundefined{\??tt\currenttabulate-\v!hoofd}%
+\def\checkfulltabulatecontent % - needed, else confusion with \c!header
+  {\ifundefined{\??tt\currenttabulate-\v!header}%
      \let\tabulateheadcontent\empty
    \else
      \def\tabulateheadcontent
        {\TABLEnoalign{\global\settrue\tabulatesomeamble}%
-        \csname\??tt\currenttabulate-\v!hoofd\endcsname
+        \csname\??tt\currenttabulate-\v!header\endcsname
         \TABLEnoalign{\global\setfalse\tabulatesomeamble}}%
    \fi
-   \ifundefined{\??tt\currenttabulate-\v!voet}%
+   \ifundefined{\??tt\currenttabulate-\v!footer}%
      \let\tabulatetailcontent\empty
    \else
      \def\tabulatetailcontent
        {\TABLEnoalign{\global\settrue\tabulatesomeamble}%
-        \csname\??tt\currenttabulate-\v!voet\endcsname
+        \csname\??tt\currenttabulate-\v!footer\endcsname
         \TABLEnoalign{\global\setfalse\tabulatesomeamble}}%
    \fi}
 
@@ -714,14 +714,14 @@
 
 \def\dostartstarttabulatehead[#1]%
   {\processcontent{\e!stop\v!tabulatehead}\next
-     {\letvalue{\??tt\iffirstargument#1\else\v!tabulate\fi::-\v!hoofd}\next}}
+     {\letvalue{\??tt\iffirstargument#1\else\v!tabulate\fi::-\v!header}\next}}
 
 \setvalue{\e!start\v!tabulatetail}%
   {\dosingleempty\dostartstarttabulatetail}
 
 \def\dostartstarttabulatetail[#1]%
   {\processcontent{\e!stop\v!tabulatetail}\next
-     {\letvalue{\??tt\iffirstargument#1\else\v!tabulate\fi::-\v!voet}\next}}
+     {\letvalue{\??tt\iffirstargument#1\else\v!tabulate\fi::-\v!footer}\next}}
 
 \def\dosubstarttabulate
   {\dodoubleempty\dodosubstarttabulate}
@@ -758,28 +758,28 @@
 \def\dofinalstarttabulate[#1][#2][#3]% identifier sub preamble
   {\edef\currenttabulate{#1::#2}%
    \ifinsidefloat \else
-     \witruimte
-     \getvalue{\??tt\currenttabulate\c!voor}%
+     \whitespace
+     \getvalue{\??tt\currenttabulate\c!before}%
    \fi
    \bgroup
    \resetcharacteralign
    % todo: spacing around tabulate when bodyfont is set
    % expansion en test needed ?
-   \doifelsevalue{\??tt\currenttabulate\c!splitsen}\v!ja
+   \doifelsevalue{\??tt\currenttabulate\c!split}\v!yes
      \splittabulatetrue\splittabulatefalse
-   \doifvaluesomething{\??tt\currenttabulate\c!korps}
+   \doifvaluesomething{\??tt\currenttabulate\c!bodyfont}
      {\expanded{\switchtobodyfont
-        [\getvalue{\??tt\currenttabulate\c!korps}]}}%
+        [\getvalue{\??tt\currenttabulate\c!bodyfont}]}}%
    \postponefootnotes % new, to be tested
    \chardef\tabulatepass\plusone
    \widowpenalty\zerocount % otherwise lines are not broken
    \clubpenalty \zerocount % but overlap in funny ways
    \the\everytabulate
-   \getvalue{\??tt\currenttabulate\c!binnen}%
+   \getvalue{\??tt\currenttabulate\c!inner}%
    \scratchdimen\leftskip
    \advance\scratchdimen \hangindent
-   \doifvalue{\??tt\currenttabulate\c!inspringen}\v!ja
-     {\advance\scratchdimen \parindent}% \voorwit
+   \doifvalue{\??tt\currenttabulate\c!indenting}\v!yes
+     {\advance\scratchdimen \parindent}% \ctxparindent
    \edef\tabulateindent{\the\scratchdimen}%
    \!!toksb\emptytoks
    \def\dorepeat*##1##2%
@@ -856,13 +856,13 @@
    \let\factor\!!plusone
    \scratchskip\strutdp
    \ExpandFirstAfter\processallactionsinset
-     [\getvalue{\??tt\currenttabulate\c!afstand}]
-     [ \v!blanko=>\scratchskip\bigskipamount,
-       \v!diepte=>\scratchskip\strutdp,
-        \v!klein=>\def\factor{.25},
-       \v!middel=>\def\factor{.5},
-        \v!groot=>,
-         \v!geen=>\scratchskip\zeropoint\def\factor{0},
+     [\getvalue{\??tt\currenttabulate\c!distance}]
+     [ \v!blank=>\scratchskip\bigskipamount,
+       \v!depth=>\scratchskip\strutdp,
+        \v!small=>\def\factor{.25},
+       \v!medium=>\def\factor{.5},
+        \v!big=>,
+         \v!none=>\scratchskip\zeropoint\def\factor{0},
          \v!grid=>\scratchskip\zeropoint\def\factor{0},
       \s!unknown=>\scratchskip\commalistelement]%
    \scratchdimen\factor\scratchskip
@@ -879,19 +879,19 @@
 
 \def\dodotabulaterule#1%
   {\color
-     [\getvalue{\??tt\currenttabulate\c!lijnkleur}]
-     {\scratchdimen\getvalue{\??tt\currenttabulate\c!lijndikte}#1}}
+     [\getvalue{\??tt\currenttabulate\c!rulecolor}]
+     {\scratchdimen\getvalue{\??tt\currenttabulate\c!rulethickness}#1}}
 
 \def\dotabulaterule
   {\dodotabulaterule
      {\hrule\!!height.5\scratchdimen\!!depth.5\scratchdimen\relax
-      \doifvalue{\??tt\currenttabulate\c!afstand}\v!grid
+      \doifvalue{\??tt\currenttabulate\c!distance}\v!grid
         {\kern-\scratchdimen}}} % experimental tm-prikkels
 
 \def\dotabulatelinerule
   {\multispan\totaltabulatecolumns % \multispan is a plain macro
    % for the moment this one
-   \strut\hskip\getvalue{\??tt\currenttabulate\c!marge}%
+   \strut\hskip\getvalue{\??tt\currenttabulate\c!margin}%
    % neg values are ok !
    \hskip\tabulateindent % new august 2003
    \dodotabulaterule
@@ -1236,16 +1236,16 @@
 \chardef\tabulaterepeathead\zerocount
 
 \def\processtabulate[|#1|]% in the process of optimizing
-  {\tabulateunit\getvalue{\??tt\currenttabulate\c!eenheid}%
+  {\tabulateunit\getvalue{\??tt\currenttabulate\c!unit}%
    \checkfulltabulatecontent
    \globallet\tabulateruledepth \!!zeropoint
    \globallet\tabulateruleheight\!!zeropoint
    \ExpandFirstAfter\processaction % use \setalignmentswitch instead
-     [\getvalue{\??tt\currenttabulate\c!uitlijnen}]
-     [\v!normaal=>\def\@@tabulatealign{0},% = default value
-       \v!rechts=>\def\@@tabulatealign{1},% chardefs gebruiken
-        \v!links=>\def\@@tabulatealign{2},%
-       \v!midden=>\def\@@tabulatealign{3},%
+     [\getvalue{\??tt\currenttabulate\c!align}]
+     [\v!normal=>\def\@@tabulatealign{0},% = default value
+       \v!right=>\def\@@tabulatealign{1},% chardefs gebruiken
+        \v!left=>\def\@@tabulatealign{2},%
+       \v!middle=>\def\@@tabulatealign{3},%
       \s!default=>\def\@@tabulatealign{0},%
       \s!unknown=>\def\@@tabulatealign{0}]%
    \let\pretabskip\!!zeropoint
@@ -1260,9 +1260,9 @@
    \resettabulatepheight
    \ifinsidefloat \else
      \processaction
-       [\getvalue{\??tt\currenttabulate\c!hoofd}]
-       [\v!herhaal=>\chardef\tabulaterepeathead\plusone,
-          \v!tekst=>\chardef\tabulaterepeathead\plustwo]%
+       [\getvalue{\??tt\currenttabulate\c!header}]
+       [\v!repeat=>\chardef\tabulaterepeathead\plusone,
+          \v!text=>\chardef\tabulaterepeathead\plustwo]%
    \fi
    \unexpanded \def\NC{\tabulatenormalcolumn0}%
    \unexpanded \def\RC{\tabulatenormalcolumn1}%
@@ -1314,9 +1314,9 @@
    \global\let\flushtabulated\empty
    \let\savedbar|\let|\nexttabulate
    \tabskip\zeropoint
-   \ifdim\getvalue{\??tt\currenttabulate\c!marge}>\zeropoint
+   \ifdim\getvalue{\??tt\currenttabulate\c!margin}>\zeropoint
      \!!toksa{&\flushtabulateindent\strut##%
-               \tabskip\getvalue{\??tt\currenttabulate\c!marge}\strut
+               \tabskip\getvalue{\??tt\currenttabulate\c!margin}\strut
               &##\tabskip\zeropoint}%
    \else
      \!!toksa{&\flushtabulateindent\strut##%
@@ -1353,7 +1353,7 @@
       \global\let\tabulatehook\dotabulatehook}%
    \let|\savedbar
    \global\let\tabulatehook\dotabulatehook
-   \doifvalue{\??tt\currenttabulate\c!inspringen}\v!nee\forgetparindent
+   \doifvalue{\??tt\currenttabulate\c!indenting}\v!no\forgetparindent
    \ifinsidefloat
      \let\tabulateindent\!!zeropoint
    \else
@@ -1502,7 +1502,7 @@
       \TABLEautoline
       \TABLEnoalign
         {\dotabulatenobreak}}%
-   \doifelsevalue{\??tt\currenttabulate\c!lijn}\v!regel
+   \doifelsevalue{\??tt\currenttabulate\c!rule}\v!line
      {\let\HL              \HR
       \let\tabulateautoline\tabulateautorule
       \let\tabulateline    \tabulaterule}%
@@ -1515,7 +1515,7 @@
       \baselinecorrection}%
    \def\FL{\TABLEnoalign
      {\ifinsidefloat\else
-        \doifemptyvalue{\??tt\currenttabulate\c!voor} % no expansion
+        \doifemptyvalue{\??tt\currenttabulate\c!before} % no expansion
           {\tablebaselinecorrection}%
       \fi
       \dotabulaterule
@@ -1529,7 +1529,7 @@
       \ifnum\noftabulatelines>\plusone
         \ifnum\noftabulatelines<\minusnoftabulatelines
           \vskip\topskip\allowbreak\vskip-\topskip
-          \vskip-\getvalue{\??tt\currenttabulate\c!lijndikte}%
+          \vskip-\getvalue{\??tt\currenttabulate\c!rulethickness}%
           \dotabulaterule
         \fi
       \fi
@@ -1540,7 +1540,7 @@
       \dotabulatenobreak
       \dotabulaterule
       \ifinsidefloat\else
-        \doifemptyvalue{\??tt\currenttabulate\c!na} % no expansion
+        \doifemptyvalue{\??tt\currenttabulate\c!after} % no expansion
           {\vskip\strutdp
            \verticalstrut
            \vskip-\struttotal}%
@@ -1548,14 +1548,14 @@
    \chardef\tabulatepass\plustwo
    %
    \ifcase\tabulaterepeathead
-     \startframedcontent[\getvalue{\??tt\currenttabulate\c!kader}]%
+     \startframedcontent[\getvalue{\??tt\currenttabulate\c!frame}]%
    \else
      \setbox\tabulatebox\vbox \bgroup
    \fi
    %
    \@EA\halign\@EA{\the\!!toksa\crcr\fulltabulatecontent\crcr}%
    \prevdepth\strutdp % nog eens beter, temporary hack
-   \doifvalue{\??tt\currenttabulate\c!afstand}\v!grid
+   \doifvalue{\??tt\currenttabulate\c!distance}\v!grid
      {\vskip-\strutdp}% experimental tm-prikkels
    %
    \ifcase\tabulaterepeathead
@@ -1566,7 +1566,7 @@
    %
    \egroup
    \ifinsidefloat \else
-     \getvalue{\??tt\currenttabulate\c!na}%
+     \getvalue{\??tt\currenttabulate\c!after}%
    \fi
    \egroup}
 
@@ -1609,16 +1609,16 @@
           \advance\dimen0\dp0
           \advance\dimen0\ht0
           \ifdim\dimen0>\pagegoal
-            \bgroup \pagina \egroup % make sure that local vars are kept
+            \bgroup \page \egroup % make sure that local vars are kept
             \ifcase\tabulaterepeathead\or
               \unvcopy2
             \or
-              \hbox{\strut\getvalue{\??tt\currenttabulate\c!titel}}%
+              \hbox{\strut\getvalue{\??tt\currenttabulate\c!title}}%
             \fi
           \fi
         \fi
         % test this on icare checklists / quite hacky ! ! !
-        \ifdim\ht0>\getvalue{\??tt\currenttabulate\c!lijndikte}\else
+        \ifdim\ht0>\getvalue{\??tt\currenttabulate\c!rulethickness}\else
           \kern-2\ht0 % brrrr
         \fi
         %
@@ -1627,7 +1627,7 @@
         \ifvoid#1 \exitloop \fi}%
    \fi}
 
-%D \startypen
+%D \starttyping
 %D \setuptabulate[split=no,rule=line]
 %D
 %D \starttabulate
@@ -1638,7 +1638,7 @@
 %D \NC tufte \NC \input tufte \NC \NR \tabulateautorule
 %D \NC tufte \NC \input tufte \NC \NR \tabulateautorule
 %D \stoptabulate
-%D \stoptypen
+%D \stoptyping
 
 % \starttabulatie[|mc|]
 % \NC \digits{100.000,00} \NC\NR
@@ -1693,22 +1693,22 @@
    \fi\fi}
 
 \setuptabulate
-  [\c!eenheid=1em,
+  [\c!unit=1em,
    EQ={:},
-   \c!kader=\v!uit,
-   \c!korps=,
-   \c!lijn=\v!normaal,
-   \c!lijnkleur=,
-   \c!lijndikte=\linewidth,
-   \c!binnen=,
-   \c!voor=\blanko,
-   \c!na=\blanko,
-   \c!afstand={\v!diepte,\v!middel},
-   \c!uitlijnen=\v!normaal,
-   \c!marge=\!!zeropoint,
-   \c!splitsen=\v!ja,
-   \c!hoofd=\v!ja,
-   \c!titel=,
-   \c!inspringen=\v!nee]
-
-\protect \endinput
\ No newline at end of file
+   \c!frame=\v!off,
+   \c!bodyfont=,
+   \c!rule=\v!normal,
+   \c!rulecolor=,
+   \c!rulethickness=\linewidth,
+   \c!inner=,
+   \c!before=\blank,
+   \c!after=\blank,
+   \c!distance={\v!depth,\v!medium},
+   \c!align=\v!normal,
+   \c!margin=\!!zeropoint,
+   \c!split=\v!yes,
+   \c!header=\v!yes,
+   \c!title=,
+   \c!indenting=\v!no]
+
+\protect \endinput