problem with the parshape example (metafun manual)

problem with the parshape example (metafun manual)

[Denis B. Roegel]

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

Re: problem with the parshape example (metafun manual)

[Denis B. Roegel]

`Denis B. Roegel' wrote
>   
>   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}

Of course, I misspelled the name of the graphic...

Please discard this question.

Sorry for that!

Denis

Re: problem with the parshape example (metafun manual)

[Christopher Tipper]

I'm getting a tex capacity message from your example. How to fix?

<parshape.tmp>
! TeX capacity exceeded, sorry [parameter stack size=1000].
\dodostartbuffer [#1][#2][#3][#4]->
                                   \iffourthargument \def \next {\dod...
\getdoubleempty ...dodogetargument #1##1#2
                                          {\def \dodogetargument {#3#...
\setupframed ...leargument \getparameters 
                                          [\??oi ]
\doifnot ...ringa {#1}\edef \!!stringb {#2
                                          }\let \donottest \doprocess...
\writetmpblock ...\tmpblocks {\string #1}}
                                          \fi 
\next ...d }\writetmpblock {\setupframed }
                                          \copyblockline 
...
l.55 \startbuffer \setupframed

If you really absolutely need more capacity,
you can ask a wizard to enlarge me.

No pages of output.

I need a wizard!

Christopher
PS I'm using
This is pdfTeX, Version 3.14159-14e-released-20000217 (MiKTeX 1.20e (Snapshot build 187))
---------------------------------------------------------------------
   Nil Desperandum Illegitimi 
   -- Don't let the bastards get you down (~Ovid)

----- Original Message ----- 
From: "Denis B. Roegel" <Denis.Roegel@loria.fr>
To: "Denis B. Roegel" <Denis.Roegel@loria.fr>
Cc: <ntg-context@ntg.nl>; <roegel@lorraine.loria.fr>
Sent: Sunday, November 05, 2000 9:49 PM
Subject: Re: problem with the parshape example (metafun manual)

> `Denis B. Roegel' wrote
> >   
> >   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}
> 
> Of course, I misspelled the name of the graphic...
> 
> Please discard this question.
> 
> Sorry for that!
> 
> Denis
> 

Re: problem with the parshape example (metafun manual)

[Hans Hagen]

At 11:21 AM 11/6/00 -0000, Christopher Tipper wrote:
>I'm getting a tex capacity message from your example. How to fix?
>
><parshape.tmp>
>! TeX capacity exceeded, sorry [parameter stack size=1000].

you can change this in texmf.cnf [kpsewhich texmf.cnf gives you the location]

main_memory.context      = 1500000 % 1000000 bot/top
hash_extra.context       =   50000 %   30000
pool_size.context        = 1000000 %  750000
string_vacancies.context =   90000 %   45000
max_strings.context      =  100000 %   55000
pool_free.context        =   47500
nest_size.context        =     500
param_size.context       =    5000
save_size.context        =   50000
stack_size.context       =    5000
obj_tab_size.context     =  200000

So, a bigger stack size -) 

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
-------------------------------------------------------------------------