From 4e7256b2d21f5d31736a4d8ab102a0fb8e0d311d Mon Sep 17 00:00:00 2001
From: Marc Auberer <marc.auberer@chillibits.com>
Date: Wed, 27 Mar 2024 20:53:52 +0100
Subject: [PATCH] [flang] Remove duplicate call to va_end()

---
 flang/runtime/io-error.cpp | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/flang/runtime/io-error.cpp b/flang/runtime/io-error.cpp
index 02f237f05bea1..b006b82f62249 100644
--- a/flang/runtime/io-error.cpp
+++ b/flang/runtime/io-error.cpp
@@ -56,9 +56,6 @@ void IoErrorHandler::SignalError(int iostatOrErrno, const char *msg, ...) {
 #endif
           ioMsg_ = SaveDefaultCharacter(
               buffer, Fortran::runtime::strlen(buffer) + 1, *this);
-#if !defined(RT_DEVICE_COMPILATION)
-          va_end(ap);
-#endif
         }
       }
       return;