From ecb767b7e301ee7cbb993bd4e308494d7e2dbd1d Mon Sep 17 00:00:00 2001 From: Thomas Quinot Date: Tue, 30 Apr 2002 15:28:01 +0000 Subject: [PATCH] Fix spelling and punctuation. Even though these are minor thins, please pay attention to them. Thanks. [Imported from Perforce change 4606 at 2006-12-01 19:39:15] Subversion-branch: /trunk/polyorb Subversion-revision: 33524 --- src/polyorb-configuration.adb | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/polyorb-configuration.adb b/src/polyorb-configuration.adb index f649a4191..5ea99db5c 100644 --- a/src/polyorb-configuration.adb +++ b/src/polyorb-configuration.adb @@ -323,9 +323,9 @@ package body PolyORB.Configuration is or else Ket = Bra + 1 or else Ket /= Last then - pragma Debug (O ("Syntax Error line :" & + pragma Debug (O ("Syntax error on line" & Integer'Image (Current_Line) & - ", " & Line (Line'First .. Last))); + ": " & Line (Line'First .. Last))); raise Syntax_Error; end if; @@ -339,9 +339,9 @@ package body PolyORB.Configuration is Line'First, '='); begin if Eq not in Line'First + 1 .. Last - 1 then - pragma Debug (O ("Syntax Error line :" & + pragma Debug (O ("Syntax error on line" & Integer'Image (Current_Line) & - ", " & Line (Line'First .. Last))); + ": " & Line (Line'First .. Last))); raise Syntax_Error; end if;