Parent Directory
| 
Revision Log
| 
Patch
| revision 58 by dpavlin, Mon Mar 23 11:30:29 2009 UTC | revision 59 by dpavlin, Wed Jun 17 16:49:17 2009 UTC | |
|---|---|---|
| # | Line 3 | Line 3 |
| 3 | use warnings; | use warnings; |
| 4 | use strict; | use strict; |
| 5 | ||
| 6 | use Test::More tests => 7; | use Test::More tests => 8; |
| 7 | use lib 'lib'; | use lib 'lib'; |
| 8 | use Data::Dump qw/dump/; | use Data::Dump qw/dump/; |
| 9 | ||
| # | Line 25 is_deeply( [ sort keys %h ], [ 'bar', 'b | Line 25 is_deeply( [ sort keys %h ], [ 'bar', 'b |
| 25 | ||
| 26 | is_deeply( \%h, { bar => 1, baz => 99, foo => 42, }, 'structure' ); | is_deeply( \%h, { bar => 1, baz => 99, foo => 42, }, 'structure' ); |
| 27 | ||
| 28 | ok( my $mem = $o->info->{used_memory}, 'info' ); | |
| 29 | #diag dump( \%h ); | diag "used memory $mem"; |
| 30 |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |