diff options
Diffstat (limited to 'selftest/output/subunit.pm')
-rw-r--r-- | selftest/output/subunit.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/selftest/output/subunit.pm b/selftest/output/subunit.pm index 720fe7285c..e99b76c1b9 100644 --- a/selftest/output/subunit.pm +++ b/selftest/output/subunit.pm @@ -33,6 +33,13 @@ sub new($) { bless($self, $class); } +sub report_time($$) +{ + my ($self, $time) = @_; + my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($time); + printf "time: %04d-%02d-%02d %02d:%02d:%02dZ\n", $year+1900, $mon, $mday, $hour, $min, $sec; +} + sub start_testsuite($$) { my ($self, $name) = @_; |