From: Piotr Trojanek <trojanek@adacore.com>
Date: Fri, 3 Jul 2020 13:42:53 +0000 (+0200)
Subject: [Ada] Fix typo in error message about contract cases
X-Git-Tag: basepoints/gcc-12~4209
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=b7fd8264143908dbc43bf9a7df7b930306eabbb8;p=thirdparty%2Fgcc.git

[Ada] Fix typo in error message about contract cases

gcc/ada/

	* sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part): Fix typo.
---

diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb
index 52e0e8971e0a..b992034c5f3b 100644
--- a/gcc/ada/sem_prag.adb
+++ b/gcc/ada/sem_prag.adb
@@ -583,7 +583,7 @@ package body Sem_Prag is
       --  Otherwise the pragma is illegal
 
       else
-         Error_Msg_N ("wrong syntax for constract cases", N);
+         Error_Msg_N ("wrong syntax for contract cases", N);
       end if;
 
       Set_Is_Analyzed_Pragma (N);