Error in cuda call

85279fad · Andreas Marek · a43ac6d6 · 85279fad
Commit 85279fad authored May 30, 2017 by Andreas Marek
--- a/src/elpa2/elpa2_template.X90
+++ b/src/elpa2/elpa2_template.X90
@@ -440,7 +440,7 @@
           ! copy to device if we want to continue on GPU
           successCUDA = cuda_malloc(q_dev, ldq*matrixCols*size_of_datatype)

-           successCUDA = cuda_memcpy(q_dev, c_loc(q), ldq*matrixCols* size_of_datatype, cudaMemcpyHostToDevice)
+           successCUDA = cuda_memcpy(q_dev, loc(q), ldq*matrixCols* size_of_datatype, cudaMemcpyHostToDevice)
         endif

         ! Backtransform stage 2