ext/Time-Piece/t/05overload.t

   1 # Tests for overloads (+,-,<,>, etc)
   2 use Test;
   3 BEGIN { plan tests => 1 }
   4 use Time::Piece;
   5 my $t = localtime;
   6 my $s = Time::Seconds->new(15);
   7 eval { my $result = $t + $s };
   8 ok($@, "", "Adding Time::Seconds does not cause runtime error");
   9