Mercurial > pub > Impl
comparison Lib/IMPL/Test/Plan.pm @ 31:d59526f6310e
Small fixes to Test framework (correct handlinf of the compilation errors in the test units)
Imported and refactored SQL DB schema from the old project
author | Sergey |
---|---|
date | Mon, 09 Nov 2009 01:39:16 +0300 |
parents | 2e546a5175dd |
children | 16ada169ca75 |
comparison
equal
deleted
inserted
replaced
30:dd4d72600c69 | 31:d59526f6310e |
---|---|
62 | 62 |
63 foreach my $Unit ($this->Units){ | 63 foreach my $Unit ($this->Units){ |
64 my %info; | 64 my %info; |
65 | 65 |
66 # preload module | 66 # preload module |
67 undef $@; | |
68 | |
67 eval "require $Unit" unless (ref $Unit); | 69 eval "require $Unit" unless (ref $Unit); |
70 | |
71 # handle loading errors | |
72 $Unit = new IMPL::Test::BadUnit($Unit,"Failed to load unit",$@) if $@; | |
68 | 73 |
69 $info{Unit} = $Unit; | 74 $info{Unit} = $Unit; |
70 try { | 75 try { |
71 $info{Tests} = [map $Unit->new($_), $Unit->List]; | 76 $info{Tests} = [map $Unit->new($_), $Unit->List]; |
72 } otherwise { | 77 } otherwise { |