aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorGaius Mulley <gaiusmod2@gmail.com>2024-07-24 14:26:39 +0100
committerThomas Koenig <tkoenig@gcc.gnu.org>2024-07-28 19:05:51 +0200
commit43d803bcb2325cc6659c39c4d264e5ce9c396f60 (patch)
tree7c2e0985431b486ef6154e033740d005e57b8703 /gcc
parent6c7ad84bc54e1a79ba19093f071acf78791ec5d5 (diff)
downloadgcc-43d803bcb2325cc6659c39c4d264e5ce9c396f60.zip
gcc-43d803bcb2325cc6659c39c4d264e5ce9c396f60.tar.gz
gcc-43d803bcb2325cc6659c39c4d264e5ce9c396f60.tar.bz2
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 <gaiusmod2@gmail.com>
Diffstat (limited to 'gcc')
-rw-r--r--gcc/m2/gm2-compiler/M2StateCheck.mod2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/m2/gm2-compiler/M2StateCheck.mod b/gcc/m2/gm2-compiler/M2StateCheck.mod
index e53cb17..940c433 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')))