From 0d354370f2e1b51efcf45c9241cabd0c7873b977 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Tue, 23 Jun 2009 12:09:38 +0200 Subject: [multiple changes] 2009-06-23 Ed Schonberg * sem_ch10.adb (Remove_Limited_With_Clause): Clean up code that handles incomplete type declarations. Previous code was potentially quadratic in the number of visible declarations in any package appearing in a limited_with_clause. 2009-06-23 Robert Dewar * prj-conf.ads, prj-part.adb, prj-proc.adb, prj-proc.ads, sem_ch8.adb, xref_lib.adb: Minor reformatting From-SVN: r148843 --- gcc/ada/xref_lib.adb | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'gcc/ada/xref_lib.adb') diff --git a/gcc/ada/xref_lib.adb b/gcc/ada/xref_lib.adb index f3c8fa3..93529132 100644 --- a/gcc/ada/xref_lib.adb +++ b/gcc/ada/xref_lib.adb @@ -49,7 +49,7 @@ package body Xref_Lib is No_Xref_Information : exception; -- Exception raised when there is no cross-referencing information in - -- the .ali files + -- the .ali files. procedure Parse_EOL (Source : not null access String; @@ -708,9 +708,9 @@ package body Xref_Lib is Ptr := Ptr + 1; end loop; - if Source (Ptr) /= EOF then - -- Skip CR or LF + -- Skip CR or LF if not at end of file + if Source (Ptr) /= EOF then Ptr := Ptr + 1; end if; -- cgit v1.1