From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 1499) id 3A5673858C27; Sat, 25 Dec 2021 15:22:05 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 3A5673858C27 Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit From: Gaius Mulley To: gcc-cvs@gcc.gnu.org Subject: [gcc/devel/modula-2] Bugfix to include spaces around error message and no scope active message. X-Act-Checkin: gcc X-Git-Author: Gaius Mulley X-Git-Refname: refs/heads/devel/modula-2 X-Git-Oldrev: fa4a4a2ee538a8e1051b7d6d5ed1858ad76103a3 X-Git-Newrev: 7f91bb254c4214f89006ea9bf3d64cf3dc965594 Message-Id: <20211225152205.3A5673858C27@sourceware.org> Date: Sat, 25 Dec 2021 15:22:05 +0000 (GMT) X-BeenThere: gcc-cvs@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gcc-cvs mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Sat, 25 Dec 2021 15:22:05 -0000 https://gcc.gnu.org/g:7f91bb254c4214f89006ea9bf3d64cf3dc965594 commit 7f91bb254c4214f89006ea9bf3d64cf3dc965594 Author: Gaius Mulley Date: Sat Dec 25 15:21:33 2021 +0000 Bugfix to include spaces around error message and no scope active message. gcc/m2/ChangeLog: * gm2-compiler/M2Error.mod (GetAnnounceScope): Issue "no scope active" message. (AnnounceScope) Add ": " after the no scope active message. Signed-off-by: Gaius Mulley Diff: --- gcc/m2/gm2-compiler/M2Error.mod | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/gcc/m2/gm2-compiler/M2Error.mod b/gcc/m2/gm2-compiler/M2Error.mod index 420ccf7a4de..379fd67ef4e 100644 --- a/gcc/m2/gm2-compiler/M2Error.mod +++ b/gcc/m2/gm2-compiler/M2Error.mod @@ -859,7 +859,7 @@ BEGIN IF currentScope = NIL THEN - desc := InitString ('') + desc := InitString ("no scope active") ELSE CASE currentScope^.scopeKind OF @@ -915,7 +915,7 @@ BEGIN lastScope := e^.scope ; IF IsErrorScopeNul (lastScope) THEN - RETURN ConCat (InitString ("no scope active"), message) + RETURN ConCat (InitString ("no scope active: "), message) ELSE Assert ((e^.scope # NIL) AND (e^.scope^.scopeKind # noscope)) ; (* filename := FindFileNameFromToken (e^.token, 0) ; *)