diff --git a/src/LIB/SURCOUCHE/src/modd_io.f90 b/src/LIB/SURCOUCHE/src/modd_io.f90 index c8457cc2d32624a020d122c41cb318faa86a1d4c..d8eab9815d3d9243b4d82f581f5a78539068ed4d 100644 --- a/src/LIB/SURCOUCHE/src/modd_io.f90 +++ b/src/LIB/SURCOUCHE/src/modd_io.f90 @@ -154,6 +154,11 @@ TYPE(TFILEDATA),POINTER,SAVE :: TFILE_SURFEX => NULL() !Pointer used to find th TYPE(TFILEDATA),POINTER,SAVE :: TFILE_OUTPUTLISTING => NULL() !Pointer used to point to the file used when writing to OUTPUT_LISTINGn file !Non existing file which can be used as a dummy target +#ifndef MNH_CRAY +!Compiler crash with Cray CCE 12.0.3, OK with CCE 11.0.2 TYPE(TFILEDATA),TARGET, SAVE :: TFILE_DUMMY = TFILEDATA(CNAME="dummy",CDIRNAME=NULL(),TFILES_IOZ=NULL()) +#else +TYPE(TFILEDATA),TARGET, SAVE :: TFILE_DUMMY +#endif END MODULE MODD_IO