diff options
author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-17 04:40:08 +0000 |
---|---|---|
committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-17 04:40:08 +0000 |
commit | d60c3572b2c5c73d0217066d3f4ebdae01663e53 (patch) | |
tree | 5157f3170a53eb9be6b856dcaeec31decab08ffe /gcc/ada/erroutc.adb | |
parent | 1d6ddbbde651efdc85412db5e1e8b2d01501023c (diff) | |
download | gcc-d60c3572b2c5c73d0217066d3f4ebdae01663e53.tar.gz |
2008-04-17 Basile Starynkevitch <basile@starynkevitch.net>
MELT branch merged with trunk r134362
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@134378 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/erroutc.adb')
-rw-r--r-- | gcc/ada/erroutc.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/erroutc.adb b/gcc/ada/erroutc.adb index 604fd5409e3..f255ac00e9e 100644 --- a/gcc/ada/erroutc.adb +++ b/gcc/ada/erroutc.adb @@ -504,7 +504,7 @@ package body Erroutc is else Start := Ptr; - -- First scan forward looing for a hard end of line + -- First scan forward looking for a hard end of line for Scan in Ptr .. Ptr + Max - 1 loop if Txt (Scan) = ASCII.LF then |