[gitmo/Moose-Autobox.git] / t / 002_example.t

#!/usr/bin/perl

use strict;
use warnings;

use Test::More tests => 18;

BEGIN {
    use_ok('Moose::Autobox');
}

ok(SCALAR->does('Moose::Autobox::Scalar'),      '... SCALAR does Moose::Autobox::Scalar');
  ok(SCALAR->does('Moose::Autobox::Value'),     '... SCALAR does Moose::Autobox::Value');
    ok(SCALAR->does('Moose::Autobox::Defined'), '... SCALAR does Moose::Autobox::Defined');
      ok(SCALAR->does('Moose::Autobox::Item'),  '... SCALAR does Moose::Autobox::Item');
      
ok(ARRAY->does('Moose::Autobox::Array'),        '... ARRAY does Moose::Autobox::Array');
  ok(ARRAY->does('Moose::Autobox::List'),       '... ARRAY does Moose::Autobox::List');
  ok(ARRAY->does('Moose::Autobox::Ref'),        '... ARRAY does Moose::Autobox::Ref');
    ok(ARRAY->does('Moose::Autobox::Defined'),  '... ARRAY does Moose::Autobox::Defined');
      ok(ARRAY->does('Moose::Autobox::Item'),   '... ARRAY does Moose::Autobox::Item');      
      
ok(HASH->does('Moose::Autobox::Hash'),          '... HASH does Moose::Autobox::Hash');
  ok(HASH->does('Moose::Autobox::Ref'),         '... HASH does Moose::Autobox::Ref');
    ok(HASH->does('Moose::Autobox::Defined'),   '... HASH does Moose::Autobox::Defined');
      ok(HASH->does('Moose::Autobox::Item'),    '... HASH does Moose::Autobox::Item');
      
ok(CODE->does('Moose::Autobox::Code'),          '... CODE does Moose::Autobox::Code');
  ok(CODE->does('Moose::Autobox::Ref'),         '... CODE does Moose::Autobox::Ref');
    ok(CODE->does('Moose::Autobox::Defined'),   '... CODE does Moose::Autobox::Defined');
      ok(CODE->does('Moose::Autobox::Item'),    '... CODE does Moose::Autobox::Item');
Commit	Line	Data
e6bb88b0	1	#!/usr/bin/perl
	2
	3	use strict;
	4	use warnings;
	5
8de7f09d	6	use Test::More tests => 18;
e6bb88b0	7
	8	BEGIN {
	9	use_ok('Moose::Autobox');
	10	}
	11
	12	ok(SCALAR->does('Moose::Autobox::Scalar'), '... SCALAR does Moose::Autobox::Scalar');
e6bb88b0	13	ok(SCALAR->does('Moose::Autobox::Value'), '... SCALAR does Moose::Autobox::Value');
	14	ok(SCALAR->does('Moose::Autobox::Defined'), '... SCALAR does Moose::Autobox::Defined');
	15	ok(SCALAR->does('Moose::Autobox::Item'), '... SCALAR does Moose::Autobox::Item');
	16
	17	ok(ARRAY->does('Moose::Autobox::Array'), '... ARRAY does Moose::Autobox::Array');
	18	ok(ARRAY->does('Moose::Autobox::List'), '... ARRAY does Moose::Autobox::List');
	19	ok(ARRAY->does('Moose::Autobox::Ref'), '... ARRAY does Moose::Autobox::Ref');
	20	ok(ARRAY->does('Moose::Autobox::Defined'), '... ARRAY does Moose::Autobox::Defined');
	21	ok(ARRAY->does('Moose::Autobox::Item'), '... ARRAY does Moose::Autobox::Item');
	22
	23	ok(HASH->does('Moose::Autobox::Hash'), '... HASH does Moose::Autobox::Hash');
	24	ok(HASH->does('Moose::Autobox::Ref'), '... HASH does Moose::Autobox::Ref');
	25	ok(HASH->does('Moose::Autobox::Defined'), '... HASH does Moose::Autobox::Defined');
	26	ok(HASH->does('Moose::Autobox::Item'), '... HASH does Moose::Autobox::Item');
	27
	28	ok(CODE->does('Moose::Autobox::Code'), '... CODE does Moose::Autobox::Code');
	29	ok(CODE->does('Moose::Autobox::Ref'), '... CODE does Moose::Autobox::Ref');
	30	ok(CODE->does('Moose::Autobox::Defined'), '... CODE does Moose::Autobox::Defined');
	31	ok(CODE->does('Moose::Autobox::Item'), '... CODE does Moose::Autobox::Item');