diff --git a/src/fft.f90 b/src/fft.f90
index 6c843f7c..9f2bde9f 100644
--- a/src/fft.f90
+++ b/src/fft.f90
@@ -5,7 +5,7 @@
 !
 ! -
 module mod_fft
-  use, intrinsic :: iso_c_binding , only: C_INT
+  use, intrinsic :: iso_c_binding, only: C_INT,c_intptr_t
   use mod_common_mpi, only: ierr
   use mod_fftw_param
   use mod_types
@@ -47,7 +47,7 @@ subroutine fftini(ng,n_x,n_y,bcxy,c_or_f,arrplan,normfft)
     integer :: ix,iy
 #if defined(_OPENACC)
     integer :: istat,batch
-    integer(int_ptr_kind()) :: wsize,max_wsize
+    integer(c_intptr_t) :: wsize,max_wsize
 #endif
 #if defined(_SINGLE_PRECISION)
     !$ call sfftw_init_threads(ierr)