Skip to content

Commit

Permalink
Use a local buffer in modf
Browse files Browse the repository at this point in the history
Fix #21591
  • Loading branch information
yuyichao committed Jul 8, 2017
1 parent 7d2b33b commit 39b813c
Showing 1 changed file with 6 additions and 6 deletions.
12 changes: 6 additions & 6 deletions base/math.jl
Original file line number Diff line number Diff line change
Expand Up @@ -693,16 +693,16 @@ julia> modf(3.5)
"""
modf(x) = rem(x,one(x)), trunc(x)

const _modff_temp = Ref{Float32}()
function modf(x::Float32)
f = ccall((:modff,libm), Float32, (Float32,Ptr{Float32}), x, _modff_temp)
f, _modff_temp[]
temp = Ref{Float32}()
f = ccall((:modff, libm), Float32, (Float32, Ptr{Float32}), x, temp)
f, temp[]
end

const _modf_temp = Ref{Float64}()
function modf(x::Float64)
f = ccall((:modf,libm), Float64, (Float64,Ptr{Float64}), x, _modf_temp)
f, _modf_temp[]
temp = Ref{Float64}()
f = ccall((:modf, libm), Float64, (Float64, Ptr{Float64}), x, temp)
f, temp[]
end

@inline ^(x::Float64, y::Float64) = nan_dom_err(ccall("llvm.pow.f64", llvmcall, Float64, (Float64, Float64), x, y), x + y)
Expand Down

0 comments on commit 39b813c

Please sign in to comment.