increase portability and standard conformance

2022-10-31 13:05:53 -04:00
parent 4c0b415487
commit c214a81526
3 changed files with 12 additions and 13 deletions
--- a/unittest/fortran/keepstuff.f90
+++ b/unittest/fortran/keepstuff.f90
@ -46,7 +46,7 @@ CONTAINS

    INTERFACE
      FUNCTION lammps_malloc(size) BIND(C, name='malloc')
-        IMPORT :: c_ptr, c_size_t
+        USE, INTRINSIC :: ISO_C_BINDING, ONLY : c_ptr, c_size_t
        IMPLICIT NONE
        INTEGER(c_size_t), VALUE :: size
        TYPE(c_ptr) :: lammps_malloc