From fa9334a233f1e04e78bf1e6c3267a87a5ba64c9f Mon Sep 17 00:00:00 2001
From: Philippe WAUTELET <philippe.wautelet@aero.obs-mip.fr>
Date: Mon, 27 Nov 2023 14:08:59 +0100
Subject: [PATCH] Philippe 27/11/2023: modd_io: workaround problem with NVHPC
 23.11

---
 src/LIB/SURCOUCHE/src/modd_io.f90 | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/LIB/SURCOUCHE/src/modd_io.f90 b/src/LIB/SURCOUCHE/src/modd_io.f90
index c4b0d94bc..267b42ac6 100644
--- a/src/LIB/SURCOUCHE/src/modd_io.f90
+++ b/src/LIB/SURCOUCHE/src/modd_io.f90
@@ -1,4 +1,4 @@
-!MNH_LIC Copyright 1994-2022 CNRS, Meteo-France and Universite Paul Sabatier
+!MNH_LIC Copyright 1994-2023 CNRS, Meteo-France and Universite Paul Sabatier
 !MNH_LIC This is part of the Meso-NH software governed by the CeCILL-C licence
 !MNH_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt
 !MNH_LIC for details. version 1.
@@ -154,8 +154,9 @@ 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_COMPILER_CCE
+#if !defined(MNH_COMPILER_CCE) && !defined(MNH_COMPILER_NVHPC)
 !Compiler crash with Cray CCE 12.0.3, OK with CCE 11.0.2
+!Compiler crash with Nvidia NVHPC 23.11 (OK with older versions)
 TYPE(TFILEDATA),TARGET, SAVE :: TFILE_DUMMY = TFILEDATA(CNAME="dummy",CDIRNAME=NULL(),TFILES_IOZ=NULL())
 #else
 TYPE(TFILEDATA),TARGET, SAVE :: TFILE_DUMMY
-- 
GitLab