From: Raphaël AMIARD <amiard@adacore.com>
Date: Fri, 11 Oct 2024 13:56:45 +0000 (+0200)
Subject: ada: Fix error message for pragma First_Controlling_Parameter
X-Git-Tag: basepoints/gcc-16~4647
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=047d6d9808bbde26d161ac736067c4b5d2bb77af;p=thirdparty%2Fgcc.git

ada: Fix error message for pragma First_Controlling_Parameter

gcc/ada/ChangeLog:

	* sem_prag.adb (Analyze_Pragma): Fix format for second line of
	warning (should be a continuation line)
---

diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb
index 00df728e9500..9a3e7acf34fd 100644
--- a/gcc/ada/sem_prag.adb
+++ b/gcc/ada/sem_prag.adb
@@ -17906,7 +17906,7 @@ package body Sem_Prag is
                   Error_Msg_N
                     ("?_j?'First_'Controlling_'Parameter has no effect", N);
                   Error_Msg_NE
-                    ("?_j?because & does not implement interface types",
+                    ("\?_j?because & does not implement interface types",
                      N, E);
                end if;