comparison _test/Test/Lang.pm @ 174:d920d2b70230

minor changes
author sergey
date Tue, 04 Oct 2011 17:55:38 +0400
parents 6148f89bb7bf
children 9057e4b95d10
comparison
equal deleted inserted replaced
173:aaab45153411 174:d920d2b70230
3 use warnings; 3 use warnings;
4 4
5 use parent qw(IMPL::Test::Unit); 5 use parent qw(IMPL::Test::Unit);
6 6
7 use IMPL::Test qw(test failed assert); 7 use IMPL::Test qw(test failed assert);
8 use IMPL::lang qw(:hash :compare); 8 use IMPL::lang qw(:hash :compare clone);
9 9
10 __PACKAGE__->PassThroughArgs; 10 __PACKAGE__->PassThroughArgs;
11 11
12 test equals => sub { 12 test equals => sub {
13 assert( equals(1,1) ); 13 assert( equals(1,1) );
72 72
73 assert( hashCompare( \%b, hashMerge(\%a,\%diff) ) ); 73 assert( hashCompare( \%b, hashMerge(\%a,\%diff) ) );
74 74
75 }; 75 };
76 76
77 test clone => {
78
79 };
80
77 1; 81 1;