[metapost] strange behaviour using metapost 1.504 from texlive 2011

[Laurent Méhats]

Le 02/08/2011 10:19, Taco Hoekwater a écrit :
> On 08/01/2011 11:05 PM, Laurent Méhats wrote:
>>
>> Does that come from metapost 1.504 or did I make a mistake updating
>> texlive ?
> 
> It is definitely metapost itself, I have identical crashes here.
> 
> Best wishes,
> Taco

Ok, thanks. I feared that answer and tried to find a temporary workaround.
I couldn't, but if that can help to fix the problem, the following code
(where "if known pct[0]: fi" and "pct[1].num:=0;" lines are swapped)
causes a "! This can't happen (copy)." rather than a segfault (the same
"fixes" as previously apply):

--%<-- test.mp
beginfig(0)
picture pct[];
pct[1].num:=0;
if known pct[0]: fi
endfig;

beginfig(1)
picture pct[];
pct[1].num:=0;
if known pct[0]: fi
endfig;

end
--%<-- test.mp

--%<-- test.log
This is MetaPost, version 1.504 (kpathsea version 6.0.1)  2 AUG 2011 14:03
**test.mp
(mpost.mp (/usr/local/texlive/2011/texmf-dist/metapost/base/plain.mp
Preloading the plain mem file, version 1.004)) (./test.mp [0]
! This can't happen (copy).
l.10 if known pct[0]:
                      fi
I'm broken. Please show this to someone who can fix can fix

1 output file written: test.0
--%<-- test.log

Incidentally, I guess the second occurrence of "can fix" in the log file
shoud be replaced with "it" :)

Regards,
Laurent Méhats