From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/3193
Path: main.gmane.org!not-for-mail
From: "Denis B. Roegel" <Denis.Roegel@loria.fr>
Newsgroups: gmane.comp.tex.context
Subject: problem with the parshape example (metafun manual)
Date: Sun, 5 Nov 2000 22:45:04 +0100 (MET)
Sender: owner-ntg-context@let.uu.nl
Message-ID: <200011052145.WAA04118@bar.loria.fr>
NNTP-Posting-Host: coloc-standby.netfonds.no
X-Trace: main.gmane.org 1035393944 14987 80.91.224.250 (23 Oct 2002 17:25:44 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Wed, 23 Oct 2002 17:25:44 +0000 (UTC)
Cc: roegel@lorraine.loria.fr
Original-To: ntg-context@ntg.nl
Xref: main.gmane.org gmane.comp.tex.context:3193
X-Report-Spam: http://spam.gmane.org/gmane.comp.tex.context:3193

When I compile the appended example with texexec --pdf,
mpost is not called and each shape is collapsed.
Moreover, tracing doesn't work either.
There is no error in the pdftex run, nor in any other place
I checked. Maybe there is a problem in the txt macros?

Thanks,

Denis

\useMPlibrary[txt]
\setupcolors[state=start]
\starttext

\startuseMPgraphic{text 1}
  path p ; p := fullcircle scaled 6cm;
  build_parshape(p,6pt,0,0,\baselinedistance,
    \strutheight,\strutdepth,\strutheight);
  draw p withpen pencircle scaled 1pt;
\stopuseMPgraphic

\startuseMPgraphic{text 2}
  path p ; p := fullsquare rotated 45 scaled 5cm;
  build_parshape(p,6pt,0,0,\baselinedistance,
    \strutheight,\strutdepth,\strutheight);
  draw p withpen pencircle scaled 1pt;
\stopuseMPgraphic

\startuseMPgraphic{text 3}
  numeric w, h; w:=h:=6cm;
  path p ; p := (.5w,h)--(0,h)--(w,0) &
    (w,0)..(.75w,.5h)..(w,h) & (w,h) -- cycle;
  build_parshape(p,6pt,0,0,\baselinedistance,
    \strutheight,\strutdepth,\strutheight);
  draw p withpen pencircle scaled 1pt;
\stopuseMPgraphic

\startuseMPgraphic{text 4}
  numeric w, h, o; 

  def shape = (o,o)--(w-o,o) & (w-o,o) .. (.75w-o,.5h) ..
    (w-2o,h-o) & (w-2o,h-o) -- (o,h-o) --cycle
  enddef;

  w := h := 6cm; o := 6pt; path p; p := shape;
  w := h := 6cm; o := 0pt; path q; q := shape;

  build_parshape(p,q,6pt,6pt,\baselinedistance,
    \strutheight,\strutdepth,\strutheight);
  draw q withpen pencircle scaled 1pt;
\stopuseMPgraphic

\defineoverlay[test 1][\useMPgraphic{test 1}]
\defineoverlay[test 2][\useMPgraphic{test 2}]
\defineoverlay[test 3][\useMPgraphic{test 3}]
\defineoverlay[test 4][\useMPgraphic{test 4}]

\startshapetext[test 1,test 2,test 3,test 4]
\dorecurse{100}{something long }
%  \input douglas % Douglas R. Hofstadter
\stopshapetext

\startbuffer
\setupframed
  [offset=overlay,align=normal,frame=off,
   width=\parwidth,height=\parheight]
\startcombination[2*2]
  {\framed[background=test 1]{\getshapetext}}{test 1}
  {\framed[background=test 2]{\getshapetext}}{test 2}
  {\framed[background=test 3]{\getshapetext}}{test 3}
  {\framed[background=test 4]{\getshapetext}}{test 4}
\stopcombination
\stopbuffer

\placefigure
  [here][fig:shapes]
  {A continuous text, typeset in a non||standard shape,
   spread over four areas, and right aligned.}
  {%\startMPinclusions
   %boolean trace_parshape; trace_parshape := true;
   %\stopMPinclusions
   \getbuffer}

\stoptext