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

##</code><code>##

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