fix and test dot product

Author: vchuravy

src/linalg.jl

@@ -41,7 +41,7 @@ function dot(x::DVector, y::DVector)
 
     results=Any[]
     asyncmap(procs(x)) do p
-            push!(results, remotecall_fetch((x, y) -> dot(localpart(x), makelocal(y, localindices(x)...)), x, y))
+            push!(results, remotecall_fetch((x, y) -> dot(localpart(x), makelocal(y, localindices(x)...)), p, x, y))
     end
     return reduce(+, results)
 end

test/darray.jl

@@ -898,6 +898,19 @@ end
 
 check_leaks()
 
+@testset "dot product" begin
+    A = drandn(20,20)
+    b = drandn(20)
+    c = A * b
+
+    @test dot(c, b) ≈ dot(convert(Array, c), convert(Array, b))
+    close(A)
+    close(b)
+    close(c)
+end
+
+check_leaks()
+
 @testset "test norm" begin
     x = drandn(20)