stable 2003.01.31

22 files changed, 58 insertions, 21 deletions

diff --git a/context/perltk/texutil.pl b/context/perltk/texutil.pl
index 4d99a197b..f3fb75514 100644
--- a/context/perltk/texutil.pl
+++ b/context/perltk/texutil.pl
@@ -2673,7 +2673,7 @@ my @dontasksuffixes =
      "mprun.mp",  "mprun.mpd",  "mprun.mpo",  "mprun.mpy") ;
 my @forsuresuffixes =
   ("tui","tup","ted","tes","top",
-   "log","tmp","run",
+   "log","tmp","run","bck",
    "mpt","mpx","mpd","mpo") ;
 my @texonlysuffixes =
   ("dvi","ps","pdf") ;
diff --git a/metapost/context/metafun.mp b/metapost/context/base/metafun.mp
index 474a10eb3..474a10eb3 100644
--- a/metapost/context/metafun.mp
+++ b/metapost/context/base/metafun.mp
diff --git a/metapost/context/mp-back.mp b/metapost/context/base/mp-back.mp
index 99e88554b..99e88554b 100644
--- a/metapost/context/mp-back.mp
+++ b/metapost/context/base/mp-back.mp
diff --git a/metapost/context/mp-butt.mp b/metapost/context/base/mp-butt.mp
index cf580211e..cf580211e 100644
--- a/metapost/context/mp-butt.mp
+++ b/metapost/context/base/mp-butt.mp
diff --git a/metapost/context/mp-char.mp b/metapost/context/base/mp-char.mp
index 9416b1349..9416b1349 100644
--- a/metapost/context/mp-char.mp
+++ b/metapost/context/base/mp-char.mp
diff --git a/metapost/context/mp-core.mp b/metapost/context/base/mp-core.mp
index 5f1341a69..5f1341a69 100644
--- a/metapost/context/mp-core.mp
+++ b/metapost/context/base/mp-core.mp
diff --git a/metapost/context/mp-form.mp b/metapost/context/base/mp-form.mp
index b5c06b11a..b5c06b11a 100644
--- a/metapost/context/mp-form.mp
+++ b/metapost/context/base/mp-form.mp
diff --git a/metapost/context/mp-func.mp b/metapost/context/base/mp-func.mp
index d8646ef3b..d8646ef3b 100644
--- a/metapost/context/mp-func.mp
+++ b/metapost/context/base/mp-func.mp
diff --git a/metapost/context/mp-grid.mp b/metapost/context/base/mp-grid.mp
index cfcc6bc15..cfcc6bc15 100644
--- a/metapost/context/mp-grid.mp
+++ b/metapost/context/base/mp-grid.mp
diff --git a/metapost/context/mp-grph.mp b/metapost/context/base/mp-grph.mp
index 957a60ec8..957a60ec8 100644
--- a/metapost/context/mp-grph.mp
+++ b/metapost/context/base/mp-grph.mp
diff --git a/metapost/context/mp-page.mp b/metapost/context/base/mp-page.mp
index 032844ce3..032844ce3 100644
--- a/metapost/context/mp-page.mp
+++ b/metapost/context/base/mp-page.mp
diff --git a/metapost/context/mp-shap.mp b/metapost/context/base/mp-shap.mp
index 0f5fe431d..0f5fe431d 100644
--- a/metapost/context/mp-shap.mp
+++ b/metapost/context/base/mp-shap.mp
diff --git a/metapost/context/mp-spec.mp b/metapost/context/base/mp-spec.mp
index 10118f2c0..10118f2c0 100644
--- a/metapost/context/mp-spec.mp
+++ b/metapost/context/base/mp-spec.mp
diff --git a/metapost/context/mp-step.mp b/metapost/context/base/mp-step.mp
index d602f7014..d602f7014 100644
--- a/metapost/context/mp-step.mp
+++ b/metapost/context/base/mp-step.mp
diff --git a/metapost/context/mp-symb.mp b/metapost/context/base/mp-symb.mp
index a84c84e82..a84c84e82 100644
--- a/metapost/context/mp-symb.mp
+++ b/metapost/context/base/mp-symb.mp
diff --git a/metapost/context/mp-text.mp b/metapost/context/base/mp-text.mp
index cb6bb3895..cb6bb3895 100644
--- a/metapost/context/mp-text.mp
+++ b/metapost/context/base/mp-text.mp
diff --git a/metapost/context/mp-tool.mp b/metapost/context/base/mp-tool.mp
index b1fd6bf22..b1fd6bf22 100644
--- a/metapost/context/mp-tool.mp
+++ b/metapost/context/base/mp-tool.mp
diff --git a/tex/context/base/cont-new.tex b/tex/context/base/cont-new.tex
index a2ff8d06e..da32e7dbe 100644
--- a/tex/context/base/cont-new.tex
+++ b/tex/context/base/cont-new.tex
@@ -18,7 +18,7 @@
 %D excellent place for hacks and new features.
 
 \unprotect
-
+
 \writestatus{\m!systems}{beware: some patches loaded from cont-new.tex!}
 
 \def\toplinebox
diff --git a/tex/context/base/context.tex b/tex/context/base/context.tex
index e961c0dfd..83c94c796 100644
--- a/tex/context/base/context.tex
+++ b/tex/context/base/context.tex
@@ -15,7 +15,7 @@
 
 \catcode`\{=1 \catcode`\}=2 
 
-\def\contextversion{2003.1.28}
+\def\contextversion{2003.1.31}
 
 %D Welcome to the main module. When this module is ran through
 %D \type{initex} or \type{tex -i} or \type{whatevertex} using
diff --git a/tex/context/base/core-tbl.tex b/tex/context/base/core-tbl.tex
index 4923a290f..e0c662039 100644
--- a/tex/context/base/core-tbl.tex
+++ b/tex/context/base/core-tbl.tex
@@ -594,6 +594,41 @@
 \let\tabulateheadcontent\empty
 \let\tabulatetailcontent\empty
 
+% \def\checkfulltabulatecontent
+%   {\ifundefined{\??tt\currenttabulate\v!hoofd}%
+%      \let\tabulateheadcontent\empty
+%    \else
+%      \@EA\let\@EA\tabulateheadcontent
+%      \csname\??tt\currenttabulate\v!hoofd\endcsname
+%    \fi
+%    \ifundefined{\??tt\currenttabulate\v!voet}%
+%      \let\tabulatetailcontent\empty
+%    \else
+%      \@EA\let\@EA\tabulatetailcontent
+%        \csname\??tt\currenttabulate\v!voet\endcsname
+%    \fi}
+% 
+% \newconditional\tabulatesomeamble
+% 
+% % \def\fulltabulatecontent
+% %   {\tabulatecontent}
+% 
+% \def\fulltabulatecontent 
+%   {\ifx\tabulateheadcontent\empty\else
+%      \TABLEnoalign{\global\settrue\tabulatesomeamble}%
+%      \tabulateheadcontent
+%      \TABLEnoalign{\global\setfalse\tabulatesomeamble}%
+%    \fi
+%    \ignorespaces\tabulatecontent
+%    \ifx\tabulatetailcontent\empty\else
+%      \TABLEnoalign{\global\settrue\tabulatesomeamble}%
+%      \tabulatetailcontent
+%    \fi}
+%
+% the previous code breaks on first \HL 
+
+\newconditional\tabulatesomeamble
+
 \def\checkfulltabulatecontent
   {\ifundefined{\??tt\currenttabulate\v!hoofd}%
      \let\tabulateheadcontent\empty
@@ -606,25 +641,24 @@
    \else
      \@EA\let\@EA\tabulatetailcontent
        \csname\??tt\currenttabulate\v!voet\endcsname
-   \fi}
-
-\newconditional\tabulatesomeamble
-
-% \def\fulltabulatecontent
-%   {\tabulatecontent}
-
-\def\fulltabulatecontent
-  {\ifx\tabulateheadcontent\empty\else
-     \TABLEnoalign{\global\settrue\tabulatesomeamble}%
-     \tabulateheadcontent
-     \TABLEnoalign{\global\setfalse\tabulatesomeamble}%
    \fi
-   \ignorespaces\tabulatecontent
+   \ifx\tabulateheadcontent\empty\else
+     \def\tabulateheadcontent
+       {\TABLEnoalign{\global\settrue\tabulatesomeamble}%
+        \tabulateheadcontent
+        \TABLEnoalign{\global\setfalse\tabulatesomeamble}}%
+   \fi
    \ifx\tabulatetailcontent\empty\else
-     \TABLEnoalign{\global\settrue\tabulatesomeamble}%
-     \tabulatetailcontent
+     \def\tabulatetailcontent
+       {\TABLEnoalign{\global\settrue\tabulatesomeamble}%
+        \tabulatetailcontent}%
    \fi}
 
+\def\fulltabulatecontent
+  {\tabulateheadcontent
+   \tabulatecontent
+   \tabulatetailcontent}
+ 
 \setvalue{\e!start\e!tabulatehead}%
   {\dosingleempty\dostartstarttabulatehead}
 
diff --git a/tex/context/base/page-mar.tex b/tex/context/base/page-mar.tex
index 442de4a35..f12a2a318 100644
--- a/tex/context/base/page-mar.tex
+++ b/tex/context/base/page-mar.tex
@@ -73,7 +73,7 @@
    \doifnumberelse\margetekstnummer
      {\ifnum\margetekstnummer>25 % to be translated 
        \writestatus\m!systems{potential margin stack overflow (\margetekstnummer)}%
-     \fi}
+      \fi}
      \donothing
    \processaction
      [\getvalue{\??im\margetekstnummer\c!uitlijnen}]
diff --git a/tex/context/base/supp-fil.tex b/tex/context/base/supp-fil.tex
index 378e0d12b..db33a050d 100644
--- a/tex/context/base/supp-fil.tex
+++ b/tex/context/base/supp-fil.tex
@@ -256,6 +256,8 @@
 
 \ifx\normalinput\undefined \let\normalinput\input \fi 
 
+\newif\iftracefiles
+
 \def\maxreadlevel{3}
 
 \def\doreadfile#1#2#3#4%
@@ -275,7 +277,7 @@
 \def\redoreadfile#1#2#3%
   {\immediate\openin\scratchread=#1\relax
    \ifeof\scratchread
-   % \writestatus\m!systems{cannot locate #1}\wait
+     \iftracefiles\writestatus\m!systems{cannot locate #1}\fi
      \immediate\closein\scratchread
      \decrement\readlevel\relax
      \ifnum\readlevel>\zerocount
@@ -286,7 +288,8 @@
      \fi
    \else
      \immediate\closein\scratchread 
-   % \writestatus\m!systems{#1 located}\wait
+     \edef\readfilename{#1}%
+     \iftracefiles\writestatus\m!systems{#1 located}\fi
      \def\next{#2\dodoreadfile}%
    \fi
    \next}