Changeset 10521 for NEMO/trunk/src/OCE/IOM/iom_nf90.F90

Timestamp:

2019-01-16T08:58:14+01:00 (5 years ago)

Author:

smasson

Message:

trunk: bugfix for compilation with (at least) gcc, see #2201

File:

• NEMO/trunk/src/OCE/IOM/iom_nf90.F90 (modified) (1 diff)

NEMO/trunk/src/OCE/IOM/iom_nf90.F90

@@ -572 +572 @@
          ENDIF
          ! define the dimension variables if it is not already done
-         cltmp = (/ 'nav_lon', 'nav_lat', 'nav_lev', 'time_counter', 'numcat' /)
+         ! Warning: we must use the same character length in an array constructor (at least for gcc compiler)
+         cltmp = (/ 'nav_lon     ', 'nav_lat     ', 'nav_lev     ', 'time_counter', 'numcat      ' /)   
          CALL iom_nf90_check(NF90_DEF_VAR( if90id, TRIM(cltmp(1)), NF90_FLOAT , (/ 1, 2 /), iom_file(kiomid)%nvid(1) ), clinfo)
          CALL iom_nf90_check(NF90_DEF_VAR( if90id, TRIM(cltmp(2)), NF90_FLOAT , (/ 1, 2 /), iom_file(kiomid)%nvid(2) ), clinfo)