Skip to content

The Fortran interface should compile without warnings

/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:1841:14:

 1841 |     do ii = 1, var_shape_len
      |              1
Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:2386:14:

 2386 |     do ii = 1, var_shape_len
      |              1
Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:2931:14:

 2931 |     do ii = 1, var_shape_len
      |              1
Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:3476:14:

 3476 |     do ii = 1, var_shape_len
      |              1
Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:751:14:

  751 |     do ii = 1, var_shape_len
      |              1
Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:1296:14:

 1296 |     do ii = 1, var_shape_len
      |              1
Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:3772:49:

 3772 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:3522:49:

 3522 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:3227:49:

 3227 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:2977:49:

 2977 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:2682:49:

 2682 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:2432:49:

 2432 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:2137:49:

 2137 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:1887:49:

 1887 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:1592:49:

 1592 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:1342:49:

 1342 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:1047:49:

 1047 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:797:49:

  797 |     integer(c_int32_t), pointer :: shape_value(:)
      |                                                 1
Warning: Unused variable 'shape_value' declared at (1) [-Wunused-variable]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:4100:2:

 4100 |   FUNCTION mm_device_find_sp(desc, device_ctx, var_data) RESULT(err_code)
      |  ^
Warning: 'mm_device_find_sp' defined but not used [-Wunused-function]
/scratch/local1/try/icon-mpim/externals/memory-manager/src/bindings/fortran/memman_f.f90:4109:2:

 4109 |   function get_var_data_device_sp_1d_old(ptr, desc, device_ctx) result(err_code)
      |  ^
Warning: 'get_var_data_device_sp_1d_old' defined but not used [-Wunused-function]
To upload designs, you'll need to enable LFS and have an admin enable hashed storage. More information