Add methods for zero and one with tests (#19)

JuliaMath · Mar 11, 2017 · 7c4e979 · 7c4e979
1 parent 8cd85d6
commit 7c4e979
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 1 deletion.
diff --git a/src/DoubleDouble.jl b/src/DoubleDouble.jl
@@ -5,7 +5,8 @@ import Base:
     convert,
     *, +, -, /, sqrt, <,
     rem, abs, rand, promote_rule,
-    show, big
+    show, big,
+    zero, one
 
 abstract AbstractDouble{T} <: Real
 
@@ -51,6 +52,11 @@ function splitprec(x::AbstractFloat)
 end
 
 
+zero{T<:AbstractFloat}(::Type{Double{T}}) = Double(zero(T))
+one{T<:AbstractFloat}(::Type{Double{T}}) = Double(one(T))
+zero(a::Double) = Double(zero(a.hi))
+one(a::Double) = Double(one(a.hi))
+
 # ones(T::Double, dims...) = fill!(Array(T, dims...), (one)(T))
 # zeros(T::Double, dims...) = fill!(Array(T, dims...), (zero)(T))
 

diff --git a/test/runtests.jl b/test/runtests.jl
@@ -16,6 +16,11 @@ dy = Double(y)
 @test x == sx == dx
 @test y == sy == dy
 
+@test zero(Double{Float64}) == Double(0.0, 0.0)
+@test one(Double{Float64}) == Double(1.0, 0.0)
+@test zero(Double(0.0, 0.0)) == Double(0.0, 0.0)
+@test one(Double(0.0, 0.0)) == Double(1.0, 0.0)
+
 dxy = dx*dy
 bxy = bx*by
 @test sx*sy == dxy