Coro segfault

[Andrey Sagulin]

Hello

perl 5.14.2 (Ubuntu 12.04LTS), libcoro-perl (6.37 from CPAN).

The following program terminated with segfault:

#!/usr/bin/perl

use warnings;
use strict;

use Coro;
my $sem = Coro::Semaphore->new(1);
my $a;
async {
         my $guard = $sem->guard;
         cede;
         $a++;
};
cede;

gdb says that an error occured somewhere in State.so. I'm not a C-hacker so I cannot provide more 
details.