On 10-2-2010 17:03, comm...@googlemail.com wrote:
\mainlanguage[de]
\enableregime[windows]
\setuplayout[backspace=1cm, rightmargin=0.58cm, width=fit, topspace=1cm,
header=1cm, footer=1cm, height=fit]

\starttext

\showmathcharacters

\stoptext

ok, this was the problem:

the math definition files are read and then the column width is calculated which is used in a second read

as the files to be used now have the mkii suffix, no file is read and we end up with 24 columns which is too much for tex's calculations

I now intercept that as well as fixedthe loading (to use mkii files)

Hans

--

-----------------------------------------------------------------
                                          Hans Hagen | PRAGMA ADE
              Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
     tel: 038 477 53 69 | fax: 038 477 53 74 | www.pragma-ade.com
                                             | www.pragma-pod.nl
-----------------------------------------------------------------
%D \module
%D   [     file=math-run,
%D      version=2001.23.04,
%D        title=\CONTEXT\ Math Macros,
%D     subtitle=Runtime Macros,
%D       author=Hans Hagen,
%D         date=\currentdate,
%D    copyright=Hans Hagen \& Ton Otten]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.

\writestatus{loading}{ConTeXt Math Macros / Runtime Macros}

\unprotect

\ifx\showmathmodern\undefined \global\chardef\showmathmodern\zerocount \fi

\gdef\showmathcharacters% nearly \showcharacters
  {\par
   \bgroup
   
\ifcase\showmathmodern\or\ifx\modern\undefined\chardef\showmathmodern\zerocount\fi\fi
   \setuptextrules[\c!bodyfont=,\c!style=]
   \starttextrule{math characters -- \currentmathcollection}
   \whitespace
   \dontcomplain
   \forgetall
   \def\startmathcollection[##1]{}
   \let\stopmathcollection\relax
   \dimen0\zeropoint
   \dimen2\zeropoint
   \def\definemathsymbol   {\dosixtupleempty\dodefinemathsymbol}
   \def\definemathcharacter{\dosixtupleempty\dodefinemathcharacter}
   \def\definemathcommand  {\dotripleempty  \dodefinemathcommand}
   %\newcounter\mathcolor
   \def\dodefinemathsymbol[##1][##2][##3][##4][##5][##6]%
     {%\doifcolorelse{math \purefamilyhex{##3}}{}
      %  {\increment\mathcolor
      %   \definecolor[math \purefamilyhex{##3}][\mathcolor]}%
      \setbox0\hbox spread 1em{\mathematics{\getvalue{##1}{}{}{}}}%
      \ifdim\wd0>\dimen0 \dimen0=\wd0 \fi
      \setbox2\hbox spread 1em{\hbox to 1em{\tttf\purefamilyhex{##3}\hss}\box0 
##1}%
      \ifdim\wd2>\dimen2 \dimen2=\wd2 \fi}
   \def\dodefinemathcharacter[##1][##2][##3][##4][##5][##6]{}
   \def\dodefinemathcommand  [##1][##2][##3]##4{}
   \readsysfile{\f!mathprefix tex.mkii}\!!doneatrue\!!doneafalse
   \readsysfile{\f!mathprefix ams.mkii}\!!donebtrue\!!donebfalse
   \if!!donea
     \if!!doneb
       \edef\encwidth{\the\dimen0}
       \dimen0=\hsize
       \advance\dimen0 2em
       \advance\dimen2 2em
       \ifcase\showmathmodern\or\advance\dimen2 4em\fi
       \divide \dimen0 by \dimen2 \advance\dimen0 1sp
       \edef\enccols{\number\dimen0}
       \startcolumns[\c!n=\enccols,\c!distance=2em]
       \def\dodefinemathsymbol[##1][##2][##3][##4][##5][##6]%
         {%\localcolortrue
          %\color
          %  [math \purefamilyhex{##3}]
             {\hbox
                {\ifcase\showmathmodern\or
                   \hbox to 
\encwidth{\modern\let\mathcollection\nomathcollection\mathematics{\getvalue{##1}{}{}{}}\hss}%
                 \fi
                 \hbox to \encwidth{\mathematics{\getvalue{##1}{}{}{}}\hss}%
                 \hbox to 1em{\tttf\purefamilyhex{##3}\hss}##1}\par}}
       \readsysfile{\f!mathprefix tex.mkii}\donothing\donothing
       \readsysfile{\f!mathprefix ams.mkii}\donothing\donothing
       \stopcolumns
     \else
       \par \tttf no chars in \f!mathprefix ams\par
     \fi
   \else
     \par \tttf no chars in \f!mathprefix tex\par
   \fi
   \stoptextrule
   \egroup}

% \definecolor[math \purefamilyhex{mr}] [darkred]
% \definecolor[math \purefamilyhex{mi}] [darkgreen]
% \definecolor[math \purefamilyhex{sy}] [darkblue]
% \definecolor[math \purefamilyhex{ex}] [darkmagenta]
% \definecolor[math \purefamilyhex{nn}] [darkyellow]
% \definecolor[math \purefamilyhex{ma}] [lightred]
% \definecolor[math \purefamilyhex{mb}] [lightgreen]
% \definecolor[math \purefamilyhex{mc}] [lightblue]
% \definecolor[math \purefamilyhex{md}] [lightmagenta]

\gdef\showmathtoken#1%
  {\starttabulate[|lT|lT|lT|l|]
   \NC token         \NC #1 \NC \NR
   \NC collection    \NC \ifcsna...@mt@\mathcollection#1\endcsname
                           \mathcollection
                         \else\ifcsna...@mt@\nomathcollection#1\endcsname
                           \nomathcollection
                         \else
                           ?%
                         \fi\fi \NC \NR
   \NC visualization \NC \mathematics{\getvalue{#1}} \NC \NR
   \NC definition    \NC \tttf 
\...@ea\defconvertedcommand\@ea\ascii\csna...@mt@\mathcollection#1\endcsname 
\ascii \NC \NR
   \stoptabulate}

\protect \endinput
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the 
Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Reply via email to