aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/par-util.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2009-04-09 14:28:57 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2009-04-09 14:28:57 +0200
commitc75c4293c3ffaf2f65ae42f7439939ae0cc65dbb (patch)
treefefb527cc5b46391416be1e51e34a5cba5b99c02 /gcc/ada/par-util.adb
parente7aea0fa3f2f3b8becc30a8ff11f835f93cc8939 (diff)
downloadgcc-c75c4293c3ffaf2f65ae42f7439939ae0cc65dbb.zip
gcc-c75c4293c3ffaf2f65ae42f7439939ae0cc65dbb.tar.gz
gcc-c75c4293c3ffaf2f65ae42f7439939ae0cc65dbb.tar.bz2
[multiple changes]
2009-04-09 Vincent Celier <celier@adacore.com> * errout.adb: Remove dependency on package Style * style.ads, styleg.adb, styleg.ads (RM_Column_Check): Remove function, moved to Stylesw. * stylesw.ads, stylesw.adb (RM_Column_Check): New function, moved from Styleg. * errutil.adb, par.adb: Import Stylesw 2009-04-09 Arnaud Charlet <charlet@adacore.com> * opt.ads: Fix typos. 2009-04-09 Robert Dewar <dewar@adacore.com> * einfo.adb: Minor reformatting From-SVN: r145832
Diffstat (limited to 'gcc/ada/par-util.adb')
-rw-r--r--gcc/ada/par-util.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/par-util.adb b/gcc/ada/par-util.adb
index bf9d7df..bf5680e 100644
--- a/gcc/ada/par-util.adb
+++ b/gcc/ada/par-util.adb
@@ -158,7 +158,7 @@ package body Util is
procedure Check_Bad_Layout is
begin
- if Style.RM_Column_Check and then Token_Is_At_Start_Of_Line
+ if RM_Column_Check and then Token_Is_At_Start_Of_Line
and then Start_Column <= Scope.Table (Scope.Last).Ecol
then
Error_Msg_BC ("(style) incorrect layout");