#!/usr/bin/perl
use strict;
use warnings;
use Test::More tests => 1;
use Beta;
use Alpha;
#print Beta::Member->meta->perl_class_definition, "\n",
# Alpha::Member->meta->perl_class_definition, "\n";
ok( Alpha::Member->can( 'friends' ), 'Alpha::Member has friends method' );