diff options
author | Gaius Mulley <gaiusmod2@gmail.com> | 2024-07-24 14:26:39 +0100 |
---|---|---|
committer | Gaius Mulley <gaiusmod2@gmail.com> | 2024-07-24 14:26:39 +0100 |
commit | 6a99f3ae962542165fdfc077f1040ea4d936691b (patch) | |
tree | e771bf1822b9914e6df4200c51e35403d46c8f55 | |
parent | 52f3473e375b1bb57d08c97291a82c04070036c3 (diff) | |
download | gcc-6a99f3ae962542165fdfc077f1040ea4d936691b.zip gcc-6a99f3ae962542165fdfc077f1040ea4d936691b.tar.gz gcc-6a99f3ae962542165fdfc077f1040ea4d936691b.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>
-rw-r--r-- | gcc/m2/gm2-compiler/M2StateCheck.mod | 2 |
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'))) |