it also gets stuck here

it also gets stuck here

[Denis B. Roegel]

The example below also gets stuck if I uncomment the 
\setupbodyfont line.

Denis

\setupcolors[state=start]
\starttext
\startMPenvironment
%\setupbodyfont[loc,mt,ppl,pcr,10pt]
\definefont[RotFont][RegularBold]
\stopMPenvironment

\resetMPdrawing
\startMPdrawing
  picture pic[];
  numeric wid[], len[], pos[], n;
  wid[0] := len[0] := pos[0] := n := 0;
\stopMPdrawing

\def\whatever#1%
  {\appendtoks#1\to\MPtoks
   \setbox\MPbox=\hbox{\bfd\the\MPtoks}%

\startMPdrawing
  n:=n+1; len[n] := \the\wd\MPbox;
\stopMPdrawing

\startMPdrawing[-]
  pic[n] := btex \bfd#1 etex;
\stopMPdrawing}

\handletokens MetaPost is Fun!\with\whatever

\startMPdrawing
  pair len; len := origin;
  for i=1 upto n:
    draw pic[i] shifted len;
    draw boundingbox pic[i] shifted len
      withpen pencircle scaled .25pt withcolor red;
    len:=len+(xpart lrcorner pic[i]-xpart llcorner pic[i],0);
  endfor;
\stopMPdrawing

\MPdrawingdonetrue
\getMPdrawing

\stoptext

Re: it also gets stuck here

[Hans Hagen]

At 11:01 PM 11/1/00 +0100, Denis B. Roegel wrote:

>%\setupbodyfont[loc,mt,ppl,pcr,10pt]

maybe you haven't defined all font on your system or in the map files, you
may try:

\setupbodyfont[ber,pcr,10pt]

or so. Keep in mind that some of those examples are made for my
configuration, which may differ from yours. 

Hans

-------------------------------------------------------------------------
                                                  Hans Hagen | PRAGMA ADE
                      Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
 tel: +31 (0)38 477 53 69 | fax: +31 (0)38 477 53 74 | www.pragma-ade.com
-------------------------------------------------------------------------