Hello bulk88,

I don’t have an answer for you, but I’ve found something that might possibly help. If I run your code as-is, I get a similar crash. Same if I change sub xs_edistance to:

sub xs_edistance
{
    my $a1 = $utf32encoder->encode($_[0],0);
    my $a2 = $utf32encoder->encode($_[1],0);
}
[download]

However, if the subroutine arguments are copied:

sub xs_edistance {
    my ($in1, $in2) = @_;
    my $a1 = $utf32encoder->encode($in1,0);
    my $a2 = $utf32encoder->encode($in2,0);
}
[download]

the tests still fail, but there is no crash.

Update: Should have mentioned, I’m running Strawberry Perl v5.16.0 built for MSWin32-x86-multi-thread-64int on 32-bit Vista; with Encode v2.47 (the latest version).

Hope that helps,