Probably fix bigfib failure

wyli · Aug 30, 2013 · b81112f · b81112f
1 parent 9b6496a
commit b81112f
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/base/gmp.jl b/base/gmp.jl
@@ -362,7 +362,7 @@ function string(x::BigInt)
     lng = ndigits(x) + 2
     z = Array(Uint8, lng)
     lng = ccall((:__gmp_snprintf,:libgmp), Int32, (Ptr{Uint8}, Culong, Ptr{Uint8}, Ptr{BigInt}...), z, lng, "%Zd", &x)
-    return bytestring(convert(Ptr{Uint8}, z[1:lng]))
+    return bytestring(z[1:lng])
 end
 
 function show(io::IO, x::BigInt)

diff --git a/base/mpfr.jl b/base/mpfr.jl
@@ -705,10 +705,10 @@ end
 function string(x::BigFloat)
     lng = 128
     for i = 1:2
-        z = Array(Uint8, lng)
-        lng = ccall((:mpfr_snprintf,:libmpfr), Int32, (Ptr{Uint8}, Culong, Ptr{Uint8}, Ptr{BigFloat}...), z, lng, "%.Re", &x) + 1
+        z = Array(Uint8, lng + 1)
+        lng = ccall((:mpfr_snprintf,:libmpfr), Int32, (Ptr{Uint8}, Culong, Ptr{Uint8}, Ptr{BigFloat}...), z, lng + 1, "%.Re", &x)
         if lng < 128 || i == 2
-            return bytestring(convert(Ptr{Uint8}, z[1:lng]))
+            return bytestring(z[1:lng])
         end
     end
 end