From ea648848eac40e07df0b0e1f5762b5d3f3f738c6 Mon Sep 17 00:00:00 2001
From: Sebastian Poeplau <poeplau@adacore.com>
Date: Mon, 26 Feb 2024 11:03:03 +0100
Subject: ada: Fix standalone Windows builds of adaint.c

Define PATH_SEPARATOR and HOST_EXECUTABLE_SUFFIX in standalone MinGW
builds; the definitions normally come from GCC, and the defaults don't
work for native Windows.

gcc/ada/

	* adaint.c: New defines for STANDALONE mode.
---
 gcc/ada/adaint.c | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'gcc')

diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index 74aa3c4..f26d69a 100644
--- a/gcc/ada/adaint.c
+++ b/gcc/ada/adaint.c
@@ -242,6 +242,13 @@ UINT __gnat_current_ccs_encoding;
 #undef DIR_SEPARATOR
 #define DIR_SEPARATOR '\\'
 
+#ifdef STANDALONE
+#undef PATH_SEPARATOR
+#define PATH_SEPARATOR ';'
+#undef HOST_EXECUTABLE_SUFFIX
+#define HOST_EXECUTABLE_SUFFIX ".exe"
+#endif
+
 #else
 #include <signal.h>
 #include <utime.h>
-- 
cgit v1.1