summaryrefslogtreecommitdiff
path: root/gcc/ada/sinput.ads
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2008-07-31 11:04:00 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2008-07-31 11:04:00 +0000
commite02f71eb1b67d925129c1af723bcd4fcf0d03f6c (patch)
tree172444d747bb0bdca1c75db6727b056c9cc0c890 /gcc/ada/sinput.ads
parent519bbb0a8f617c99e927760e094522c677b9600a (diff)
downloadgcc-e02f71eb1b67d925129c1af723bcd4fcf0d03f6c.tar.gz
2008-07-31 Vincent Celier <celier@adacore.com>
* prj-nmsc.adb: (Record_Ada_Source): Do not set Data.Sources, component has been removed * prj.adb: Remove component Sources in record Project_Data * prj.ads: Remove component Sources in record Project_Data * sinput.ads, prj-util.ads: Minor reformatting git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@138387 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sinput.ads')
-rw-r--r--gcc/ada/sinput.ads12
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/ada/sinput.ads b/gcc/ada/sinput.ads
index 6d3144092cf..82d03e75d23 100644
--- a/gcc/ada/sinput.ads
+++ b/gcc/ada/sinput.ads
@@ -565,12 +565,12 @@ package Sinput is
procedure Skip_Line_Terminators
(P : in out Source_Ptr;
Physical : out Boolean);
- -- On entry, P points to a line terminator that has been encountered,
- -- which is one of FF,LF,VT,CR or a wide character sequence whose value is
- -- in category Separator,Line or Separator,Paragraph. The purpose of this
- -- P points just past the character that was scanned. The purpose of this
- -- routine is to distinguish physical and logical line endings. A physical
- -- line ending is one of:
+ -- On entry, P points to a line terminator that has been encountered, which
+ -- is one of FF,LF,VT,CR or a wide character sequence whose value is in
+ -- category Separator,Line or Separator,Paragraph. P points just past the
+ -- character that was scanned. The purpose of this routine is to
+ -- distinguish physical and logical line endings. A physical line ending is
+ -- one of:
--
-- CR on its own (MAC System 7)
-- LF on its own (Unix and unix-like systems)