LCPQ/qp2
9
1
Fork 0
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-12-22 19:43:32 +01:00
Code Releases Activity

Separated gpu and gpu_arch

Browse Source
This commit is contained in:
Anthony Scemama 2024-06-27 12:07:48 +02:00
parent 5d80cb7b2d
commit 6c02ac0f0b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/gpu/gpu_module.F90
View File

@ -107,7 +107,7 @@ module gpu
double precision, pointer, intent(inout) :: ptr double precision, pointer, intent(inout) :: ptr
type(c_ptr) :: cptr type(c_ptr) :: cptr
cptr = c_loc(ptr) cptr = c_loc(ptr)
call gpu_deallocate(cptr) call gpu_deallocate_c(cptr)
NULLIFY(ptr) NULLIFY(ptr)
end subroutine end subroutine