Rafael Garcia-Suarez <[EMAIL PROTECTED]> writes:
>Konstantin Stopani (via RT) wrote:
>> this code gives segmentation fault on my Fedora Core 2/linux-2.6.8.1
>>
>> #!/usr/bin/perl -w
>> use strict;
>> use warnings;
>> use threads;
>> use threads::shared;
>> use encoding "utf8"; # no segfault if remove
>>
>> my $t = threads->new(\&fn);
>>
>> sub fn {
>> print "hello\n";
>> }
>
>Reproduced here with bleadperl; apparently this comes from this bit in
>ext/PerlIO/encoding/encoding.xs (function PerlIOEncode_getarg()) :
>
> /* Not 100% sure stack swap is right thing to do during dup ... */
Seems like it isn't ;-)
> PUSHSTACKi(PERLSI_MAGIC);
Someone could experiment with commenting out the stack swap,
that isn't the right total fix but if it made segfault go away it would
be a hint.
