From 6a99f3ae962542165fdfc077f1040ea4d936691b Mon Sep 17 00:00:00 2001 From: Gaius Mulley Date: Wed, 24 Jul 2024 14:26:39 +0100 Subject: [PATCH] modula2: Improve error message to include symbol name. gcc/m2/ChangeLog: * gm2-compiler/M2StateCheck.mod (GenerateError): Add symbol name to the error message. Signed-off-by: Gaius Mulley --- gcc/m2/gm2-compiler/M2StateCheck.mod | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/m2/gm2-compiler/M2StateCheck.mod b/gcc/m2/gm2-compiler/M2StateCheck.mod index e53cb174474..940c433bcc1 100644 --- a/gcc/m2/gm2-compiler/M2StateCheck.mod +++ b/gcc/m2/gm2-compiler/M2StateCheck.mod @@ -306,7 +306,7 @@ PROCEDURE GenerateError (tok: CARDINAL; s: StateCheck; sym: CARDINAL) ; VAR str: String ; BEGIN - str := InitString ('not expecting a {%1Ad} {%1a: }in a ') ; + str := InitString ('not expecting the {%1Ad} {%1a} in a ') ; IF const IN s^.state THEN str := ConCat (str, Mark (InitString ('{%kCONST} block'))) -- 2.47.2