aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/scng.adb
diff options
context:
space:
mode:
authorRobert Dewar <dewar@adacore.com>2005-03-29 18:14:20 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2005-03-29 18:14:20 +0200
commitdebe0ab674d54dbe2df6358be39f56143e00ca8e (patch)
treebcdecf2cbba892fbd44f1149051ea028d0d1c515 /gcc/ada/scng.adb
parentd127f91b1d4b99d53d31a80076bf178ceb4053df (diff)
downloadgcc-debe0ab674d54dbe2df6358be39f56143e00ca8e.zip
gcc-debe0ab674d54dbe2df6358be39f56143e00ca8e.tar.gz
gcc-debe0ab674d54dbe2df6358be39f56143e00ca8e.tar.bz2
errutil.adb, errout.adb: Minor comment updates on Line_Terminator references
2005-03-29 Robert Dewar <dewar@adacore.com> * errutil.adb, errout.adb: Minor comment updates on Line_Terminator references * par-ch10.adb: Add ??? comment about line terminator * styleg.adb (Check_Line_Terminator): Add check for new switch -gnatyd (check dos line terminator). (Check_Line_Max_Length): New procedure, split off from the existing Check_Line_Terminator routine. Separating this out allows -gnatyf to be properly recognized. * styleg.adb: Add ??? comment for line terminator reference * scng.adb (Check_End_Of_Line): Fix bug of -gnatyf being ignored (Check_End_Of_Line): Add -gnatyd handling (check dos line terminators) * styleg.ads (Check_Line_Terminator): Add check for new switch -gnatyd (check dos line terminator). (Check_Line_Max_Length): New procedure, split off from the existing Check_Line_Terminator routine. Separating this out allows -gnatyf to be properly recognized. * stylesw.ads, stylesw.adb: Add handling for new -gnatyd switch (check dos line terminator) * switch-c.adb: Recognize new -gnatyd switch (check dos line terminator) Recognize -gnatwb/-gnatwB switches Include Warn_On_Bad_Fixed_Value for -gnatg * usage.adb: Add line for new -gnatyd switch (check dos line terminator) * usage.adb: Add lines for -gnatwb/-gnatwB * vms_data.ads: Add entry for NOCRLF (-gnatyd) * vms_data.ads: [NO_]BAD_FIXED_VALUES synonym for -gnatwb/-gnatwB * gnat_ugn.texi: Fix overlong lines Document new -gnatyd switch Document new -gnatwb/-gnatwB switches From-SVN: r97169
Diffstat (limited to 'gcc/ada/scng.adb')
-rw-r--r--gcc/ada/scng.adb8
1 files changed, 7 insertions, 1 deletions
diff --git a/gcc/ada/scng.adb b/gcc/ada/scng.adb
index 5621ff6..13ef75c 100644
--- a/gcc/ada/scng.adb
+++ b/gcc/ada/scng.adb
@@ -342,8 +342,14 @@ package body Scng is
Len : constant Int := Int (Scan_Ptr) - Int (Current_Line_Start);
begin
- if Style_Check and Style_Check_Max_Line_Length then
+ if Style_Check then
Style.Check_Line_Terminator (Len);
+ end if;
+
+ -- Deal with checking maximum line length
+
+ if Style_Check and Style_Check_Max_Line_Length then
+ Style.Check_Line_Max_Length (Len);
-- If style checking is inactive, check maximum line length against
-- standard value. Note that we take this from Opt.Max_Line_Length