Mercurial > pub > Impl
comparison _test/Test/Web/View.pm @ 280:c6d0f889ef87
+IMPL::declare now supports meta attributes
*bugfixes related to the typeof() operator
| author | cin |
|---|---|
| date | Wed, 06 Feb 2013 02:15:48 +0400 |
| parents | 0f59b2de72af |
| children | d357b5d85d25 |
comparison
equal
deleted
inserted
replaced
| 279:af8af4b8337e | 280:c6d0f889ef87 |
|---|---|
| 8 __PACKAGE__->PassThroughArgs; | 8 __PACKAGE__->PassThroughArgs; |
| 9 | 9 |
| 10 use File::Slurp; | 10 use File::Slurp; |
| 11 use Scalar::Util qw(weaken); | 11 use Scalar::Util qw(weaken); |
| 12 | 12 |
| 13 use IMPL::lang; | |
| 13 use IMPL::Test qw(assert test GetCallerSourceLine); | 14 use IMPL::Test qw(assert test GetCallerSourceLine); |
| 14 use IMPL::Web::View::TTLoader(); | 15 use IMPL::Web::View::TTLoader(); |
| 15 | 16 |
| 16 use constant { | 17 use constant { |
| 17 TTLoader => typeof IMPL::Web::View::TTLoader, | 18 TTLoader => 'IMPL::Web::View::TTLoader', |
| 18 MProfiler => 'IMPL::Profiler::Memory' | 19 MProfiler => 'IMPL::Profiler::Memory' |
| 19 }; | 20 }; |
| 20 | 21 |
| 21 sub AssertMemoryLeak { | 22 sub AssertMemoryLeak { |
| 22 my $code = shift; | 23 my $code = shift; |
