Fortran wrapper for magma_dgetrf_gpu

[athlonshi]

Hi,
I was trying to write a Fortran wrapper for double precision LU decomposition subroutine magma_dgetrf_gpu by following the example wrapper program magma_dgetrf_gpu_f
I was able to compile the testing example. However, when compiling my own code, I encountered error messages "error #6633: The type of the actual argument differs from the type of the dummy argument. [DEVPTRA] call magma_dgetrf_gpu(LDA, N, devptrA, N, IPVT, info)"

In my subroutine, I declare "real, dimension(4) :: devptrA" which exactly the same as the testing example. I am wondering whether this was caused by incorrect compiler options? I have also tried to use exact compiler options as those used in the testing codes, but still got the same error. Does anyone have any clue? Thanks very much!

Yu

[athlonshi]

hi,
I solved the problem
It is due to the fact that I used -r8 option
But since devptrA is defined as real and MAGMA compiling options do not include -r8 for Fortran, -r8 should be disabled when compiling my wrapper