aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/binderr.ads
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2017-01-19 12:46:14 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2017-01-19 12:46:14 +0100
commitc63a2ad68bc0704fc2926badc46f3ccd952dbbb9 (patch)
tree9b5192623bf3246439db9c7ea3d6c832eca97899 /gcc/ada/binderr.ads
parent40bf00b1f85afad60951ed3c07b5ffd6414241cf (diff)
downloadgcc-c63a2ad68bc0704fc2926badc46f3ccd952dbbb9.zip
gcc-c63a2ad68bc0704fc2926badc46f3ccd952dbbb9.tar.gz
gcc-c63a2ad68bc0704fc2926badc46f3ccd952dbbb9.tar.bz2
[multiple changes]
2017-01-19 Hristian Kirtchev <kirtchev@adacore.com> * lib-xref-spark_specific.adb, sem_util.adb, sem_util.ads, sem_ch4.adb, sem_ch8.adb, lib-xref.ads: Minor reformatting. 2017-01-19 Bob Duff <duff@adacore.com> * bcheck.adb (Check_Consistent_Dynamic_Elaboration_Checking): Increment Warnings_Detected. It was decrementing, which is wrong since we just issued a warning message. * binderr.ads (Errors_Detected, Warnings_Detected): Declare these variables to be of subtype Nat instead of Int, because they should never be negative. 2017-01-19 Javier Miranda <miranda@adacore.com> * contracts.adb (Build_Postconditions_Procedure): Replace Generate_C_Code by Modify_Tree_For_C. * exp_aggr.adb (Build_Record_Aggr_Code, Expand_Array_Aggregate): Replace Generate_C_Code by Modify_Tree_For_C. * exp_attr.adb (Float_Valid, Is_GCC_Target): Replace Generate_C_Code by Modify_Tree_For_C. * exp_ch11.adb (Expand_N_Exception_Declaration): Replace Generate_C_Code by Modify_Tree_For_C. * exp_ch4.adb (Expand_Allocator_Expression): Replace Generate_C_Code by Modify_Tree_For_C. * exp_dbug.adb (Qualify_Entity_Name): Replace Generate_C_Code by Modify_Tree_For_C. * exp_util.adb (Remove_Side_Effects, Side_Effect_Free): Replace Generate_C_Code by Modify_Tree_For_C. * sem_res.adb (Resolve_Type_Conversion): Replace Generate_C_Code by Modify_Tree_For_C. * sinfo.ads (Modify_Tree_For_C): Adding documentation. From-SVN: r244619
Diffstat (limited to 'gcc/ada/binderr.ads')
-rw-r--r--gcc/ada/binderr.ads6
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/binderr.ads b/gcc/ada/binderr.ads
index 46b1846..a6434a0 100644
--- a/gcc/ada/binderr.ads
+++ b/gcc/ada/binderr.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1992-2014, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2016, 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- --
@@ -31,10 +31,10 @@ with Types; use Types;
package Binderr is
- Errors_Detected : Int;
+ Errors_Detected : Nat;
-- Number of errors detected so far
- Warnings_Detected : Int;
+ Warnings_Detected : Nat;
-- Number of warnings detected
Info_Prefix_Suppress : Boolean := False;