use lib 't', 'lib';
package AAA;
use Spiffy -Base;

package BBB;
use Spiffy -Base;
field foo => 42;


package main;
use Test::More tests => 1;

my $a = AAA->new;
$a->mixin('BBB');
is($a->foo, 42);