add more gpu fixes

Signed-off-by: Jade Abraham <[email protected]>
chapel-lang · Aug 23, 2023 · b25aed9 · b25aed9
1 parent be51348
commit b25aed9
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/modules/standard/GPU.chpl b/modules/standard/GPU.chpl
@@ -145,7 +145,7 @@ module GPU
     until completion of this asynchronous transfer
   */
   @chpldoc.nodoc
-  proc asyncGpuComm(dstArr : ?t1, srcArr : ?t2) : GpuAsyncCommHandle
+  proc asyncGpuComm(ref dstArr : ?t1, srcArr : ?t2) : GpuAsyncCommHandle
     where isArrayType(t1) && isArrayType(t2)
   {
     extern proc chpl_gpu_comm_async(dstArr : c_ptr(void), srcArr : c_ptr(void),
@@ -155,7 +155,7 @@ module GPU
       halt("Arrays passed to asyncGpuComm must have the same number of elements. ",
         "Sizes passed: ", dstArr.size, " and ", srcArr.size);
     }
-    return chpl_gpu_comm_async(c_ptrTo(dstArr), c_ptrTo(srcArr),
+    return chpl_gpu_comm_async(c_ptrTo(dstArr), c_ptrToConst(srcArr),
       dstArr.size * numBytes(dstArr.eltType));
   }
 

diff --git a/test/gpu/native/studies/sort/radixSortGpu.chpl b/test/gpu/native/studies/sort/radixSortGpu.chpl
@@ -137,7 +137,7 @@ module RadixSort {
       writeln("Pf sum: ",count);
   }
 
-  proc radixSort(inputArr: [] uint){
+  proc radixSort(ref inputArr: [] uint){
     if (noisy){
         writeln("Bits at a time: ", bitsAtATime);
         writeln("Buckets: ", buckets);