diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2016-04-19 14:59:27 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2016-04-19 14:59:27 +0200 |
commit | 16e764a7f44bbc29254f041fe0f3064cce65b994 (patch) | |
tree | a83fb2e298eb4d43738609e6f7a59356edfce6ec /gcc/ada/styleg.ads | |
parent | 4754d4e86afb974d0316a2b2793029f4407d762f (diff) | |
download | gcc-16e764a7f44bbc29254f041fe0f3064cce65b994.zip gcc-16e764a7f44bbc29254f041fe0f3064cce65b994.tar.gz gcc-16e764a7f44bbc29254f041fe0f3064cce65b994.tar.bz2 |
[multiple changes]
2016-04-19 Ed Schonberg <schonberg@adacore.com>
* sem_attr.adb (Resolve_Attribute, case 'Access): Freeze
overloadable entity if originally overloaded.
2016-04-19 Arnaud Charlet <charlet@adacore.com>
* exp_aggr.adb, exp_ch3.adb, exp_ch7.adb, exp_ch9.adb, exp_code.adb,
exp_fixd.adb, namet.adb, osint.adb, osint.ads, par-ch2.adb,
sem_ch10.adb, sem_ch12.adb, sem_disp.adb, sem_elab.adb, sem_elim.adb
sem_util.adb, styleg.adb, styleg.ads, stylesw.ads: Minor code
clean up.
From-SVN: r235194
Diffstat (limited to 'gcc/ada/styleg.ads')
-rw-r--r-- | gcc/ada/styleg.ads | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/styleg.ads b/gcc/ada/styleg.ads index 344d4fb..141c114 100644 --- a/gcc/ada/styleg.ads +++ b/gcc/ada/styleg.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2014, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2015, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -109,12 +109,12 @@ package Styleg is procedure Check_Left_Paren; -- Called after scanning out a left parenthesis to check spacing - procedure Check_Line_Max_Length (Len : Int); + procedure Check_Line_Max_Length (Len : Nat); -- Called with Scan_Ptr pointing to the first line terminator character -- terminating the current line. Used to check for appropriate line length. -- The parameter Len is the length of the current line. - procedure Check_Line_Terminator (Len : Int); + procedure Check_Line_Terminator (Len : Nat); -- Called with Scan_Ptr pointing to the first line terminator terminating -- the current line, used to check for appropriate line terminator usage. -- The parameter Len is the length of the current line. |