Mercurial > pub > Impl

comparison Lib/IMPL/Test/Unit.pm @ 159:f8de52d3c112

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
IMPL::Test::Unit minor changes
author wizard
date Mon, 27 Dec 2010 01:37:44 +0300
parents 964587c5183c
children 4267a2ac3d46
comparison
equal deleted inserted replaced
158:a9f4ba4783eb 159:f8de52d3c112
28 } 28 }
29 29
30 sub UnitName { 30 sub UnitName {
31 my ($self) = @_; 31 my ($self) = @_;
32 $self->toString; 32 $self->toString;
33 }
34
35 sub Setup {
36 1;
37 } 33 }
38 34
39 sub Cleanup { 35 sub Cleanup {
40 my ($this,$session) = @_; 36 my ($this,$session) = @_;
41 37
72 my ($this,$session) = @_; 68 my ($this,$session) = @_;
73 69
74 my $t = [gettimeofday]; 70 my $t = [gettimeofday];
75 return try { 71 return try {
76 $this->InitTest($session); 72 $this->InitTest($session);
77 $this->Setup;
78 my $code = $this->Code; 73 my $code = $this->Code;
79 74
80 75
81 my $t0 = [gettimeofday]; 76 my $t0 = [gettimeofday];
82 my $elapsed; 77 my $elapsed;