From: Piotr Trojanek <trojanek@adacore.com>
Date: Wed, 21 Feb 2024 23:42:59 +0000 (+0100)
Subject: ada: Fix typo in CUDA error message
X-Git-Tag: basepoints/gcc-16~9001
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=bc35098efbfb14cf17f0f79f5dfcb44fdf0975de;p=thirdparty%2Fgcc.git

ada: Fix typo in CUDA error message

Fix typo in error message; semantics is unaffected.

gcc/ada/

	* gnat_cuda.adb (Remove_CUDA_Device_Entities): Fix typo.
---

diff --git a/gcc/ada/gnat_cuda.adb b/gcc/ada/gnat_cuda.adb
index 92576a4b397..b531c15d380 100644
--- a/gcc/ada/gnat_cuda.adb
+++ b/gcc/ada/gnat_cuda.adb
@@ -270,7 +270,7 @@ package body GNAT_CUDA is
                  and then Present (Corresponding_Stub (Parent (Bod)))
                then
                   Error_Msg_N
-                    ("CUDA_Device not suported on separate subprograms",
+                    ("CUDA_Device not supported on separate subprograms",
                      Corresponding_Stub (Parent (Bod)));
                else
                   Remove (Bod);