From 4de963dc17eb682e774a85a494a28001d6e6aa98 Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Sun, 24 Sep 2023 10:16:37 +0200
Subject: [PATCH] Enforce trailing underscores on symbols when IBM xlf is
 combined with gcc

---
 f_check | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/f_check b/f_check
index 526c41dc6..f30231bc4 100755
--- a/f_check
+++ b/f_check
@@ -155,6 +155,10 @@ else
             *'IBM XL'*)
                 vendor=IBM
                 openmp='-openmp'
+		case "$CC" in *gcc*)
+		bu=_
+		;;
+		esac
                 ;;
             *NAG*)
                 vendor=NAG
@@ -223,6 +227,10 @@ else
             *ppuf*|*xlf*)
                 vendor=IBM
                 openmp='-openmp'
+		case "$CC" in *gcc*)
+		bu=_
+		;;
+		esac
                 ;;
             *open64*)
                 vendor=OPEN64