@@ -451,11 +451,11 @@ toms(c::Second) = 1000 * value(c)
451
451
toms (c:: Minute ) = 60000 * value (c)
452
452
toms (c:: Hour ) = 3600000 * value (c)
453
453
toms (c:: Period ) = 86400000 * days (c)
454
- toms (c:: CompoundPeriod ) = isempty (c. periods) ? 0.0 : Float64 ( sum (toms, c. periods) )
454
+ toms (c:: CompoundPeriod ) = isempty (c. periods) ? 0.0 : sum (p -> convert (Float64, toms (p)) :: Float64 , c. periods)
455
455
tons (x) = toms (x) * 1000000
456
456
tons (x:: Microsecond ) = value (x) * 1000
457
457
tons (x:: Nanosecond ) = value (x)
458
- tons (c:: CompoundPeriod ) = isempty (c. periods) ? 0.0 : Float64 ( sum (tons, c. periods) )
458
+ tons (c:: CompoundPeriod ) = isempty (c. periods) ? 0.0 : sum (p -> convert (Float64, tons (p)) :: Float64 , c. periods)
459
459
days (c:: Millisecond ) = div (value (c), 86400000 )
460
460
days (c:: Second ) = div (value (c), 86400 )
461
461
days (c:: Minute ) = div (value (c), 1440 )
@@ -465,7 +465,7 @@ days(c::Week) = 7 * value(c)
465
465
days (c:: Year ) = 365.2425 * value (c)
466
466
days (c:: Quarter ) = 91.310625 * value (c)
467
467
days (c:: Month ) = 30.436875 * value (c)
468
- days (c:: CompoundPeriod ) = isempty (c. periods) ? 0.0 : Float64 ( sum (days, c. periods) )
468
+ days (c:: CompoundPeriod ) = isempty (c. periods) ? 0.0 : sum (p -> convert (Float64, days (p)) :: Float64 , c. periods)
469
469
seconds (x:: Nanosecond ) = value (x) / 1000000000
470
470
seconds (x:: Microsecond ) = value (x) / 1000000
471
471
seconds (x:: Millisecond ) = value (x) / 1000
0 commit comments