aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sinput.ads
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2015-11-12 12:52:59 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2015-11-12 12:52:59 +0100
commit549cc9c2bcb93b5424c9a0967016d4e51e587311 (patch)
treee3316f28c5129d8661e41c313965dd0c973deda3 /gcc/ada/sinput.ads
parentb3083540f530b6e28e57756e23c98670f69df4af (diff)
downloadgcc-549cc9c2bcb93b5424c9a0967016d4e51e587311.zip
gcc-549cc9c2bcb93b5424c9a0967016d4e51e587311.tar.gz
gcc-549cc9c2bcb93b5424c9a0967016d4e51e587311.tar.bz2
[multiple changes]
2015-11-12 Ed Schonberg <schonberg@adacore.com> * sem_ch8.adb (Find_Selected_Component): In a synchronized body, a reference to an operation of an object of the same synchronized type was always interpreted as a reference to the current instance. This is not always the case, as the prefix of the reference may designate an object of the same type declared in the enclosing context prior to the body. 2015-11-12 Arnaud Charlet <charlet@adacore.com> * impunit.ads, impunit.adb (Get_Kind_Of_File): New. Cleaned up implementation from previous Get_Kind_Of_Unit. (Get_Kind_Of_Unit): Reimplemented using Get_Kind_Of_File. * debug.adb: Remove d.4 switch, no longer used. * opt.ads: Update doc on Debugger_Level. * gnat1drv.adb: Code clean ups. * sinput.ads: minor fix in comment 2015-11-12 Bob Duff <duff@adacore.com> * sinfo.adb, sinfo.ads, sem_ch6.adb, atree.ads: Add Was_Expression_Function flag, which is set in sem_ch6.adb when converting an Expression_Function into a Subprogram_Body. 2015-11-12 Pascal Obry <obry@adacore.com> * usage.adb: Update overflow checking documentation. From-SVN: r230243
Diffstat (limited to 'gcc/ada/sinput.ads')
-rw-r--r--gcc/ada/sinput.ads2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sinput.ads b/gcc/ada/sinput.ads
index 76ff651..f1a2724 100644
--- a/gcc/ada/sinput.ads
+++ b/gcc/ada/sinput.ads
@@ -608,7 +608,7 @@ package Sinput is
function Num_Source_Lines (S : Source_File_Index) return Nat;
-- Returns the number of source lines (this is equivalent to reading
-- the value of Last_Source_Line, but returns Nat rather than a
- -- physical line number.
+ -- physical line number).
procedure Register_Source_Ref_Pragma
(File_Name : File_Name_Type;