Attribute value after clearer is called differs between lazy and non-lazy

test_moo.pl

{
    package FooMoo;
    use Moo;

    has foo => (
        is => 'rw',
        default => sub { 'foo' },
        clearer => 1,
    );

    has bar => (
        is => 'rw',
        default => sub { 'bar' },
        lazy => 1,
        clearer => 1,
    );

}

use strict;
use warnings;
use feature ':5.10';

my $foo = FooMoo->new;
say "foo: " . $foo->foo;
$foo->foo( "BAZINGA" );
say "foo after set: " . $foo->foo;
$foo->clear_foo;
say "foo after clear: " . $foo->foo;

say "bar: " . $foo->bar;
$foo->bar( "BAZINGA" );
say "bar after set: " . $foo->bar;
$foo->clear_bar;
say "bar after clear: " . $foo->bar;