diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-10-20 12:07:09 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-10-20 12:07:09 +0200 |
| commit | be7e4a402a2c350e685e3af144ae10fcc03c08ac (patch) | |
| tree | 4f725f3c61ee4589a4d7c3e9a1684d8f6af4b6d8 /gcc/ada/fe.h | |
| parent | 46ee0270b7a30d7d98eb0358079f5213556609b8 (diff) | |
| download | gcc-be7e4a402a2c350e685e3af144ae10fcc03c08ac.zip gcc-be7e4a402a2c350e685e3af144ae10fcc03c08ac.tar.gz gcc-be7e4a402a2c350e685e3af144ae10fcc03c08ac.tar.bz2 | |
[multiple changes]
2015-10-20 Philippe Gil <gil@adacore.com>
* g-debpoo.ads (Dump): NEW print Debug_Pool statistics & main
contributors.
(Dump_Stdout): NEW print to stdout Debug_Pool statistics &
main contributors.
(Reset): NEW reset counters to 0.
(Get_Size): NEW return size allocated at parameter.
(High_Water_Mark): NEW.
(Current_Water_Mark): NEW.
(System_Memory_Debug_Pool): NEW tell Debug_Pools that
System.Memory uses it.
* g-debpoo.adb (Traceback_Htable_Elem): add Frees, Total_Frees
components.
(Find_Or_Create_Traceback): don't manage in System.Memory
Debug_Pool Deallocate Traceback's.
(Validity): add optional Handled table when System.Memory asked
for Allow_Unhandled_Memory.
(Allocate): handle Allocate reentrancy occuring when System.Memory
uses Debug_Pools.
(Deallocate): handle when Allow_Unhandled_Memory
is set deallocation of unhandled memory. Dont't check
Size_In_Storage_Elements if equal to Storage_Count'Last. update
Frees, Total_Frees new components.
2015-10-20 Eric Botcazou <ebotcazou@adacore.com>
* fe.h: Minor tweak.
From-SVN: r229036
Diffstat (limited to 'gcc/ada/fe.h')
| -rw-r--r-- | gcc/ada/fe.h | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/fe.h b/gcc/ada/fe.h index 88686e8..1df23b5 100644 --- a/gcc/ada/fe.h +++ b/gcc/ada/fe.h @@ -6,7 +6,7 @@ * * * C Header File * * * - * 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- * @@ -39,6 +39,10 @@ extern "C" { #endif +/* atree: */ + +#define Serious_Errors_Detected atree__serious_errors_detected + /* comperr: */ #define Compiler_Abort comperr__compiler_abort @@ -77,10 +81,6 @@ extern Boolean Is_Entity_Name (Node_Id); #define Get_Attribute_Definition_Clause einfo__get_attribute_definition_clause extern Node_Id Get_Attribute_Definition_Clause (Entity_Id, char); -/* atree: */ - -#define Serious_Errors_Detected atree__serious_errors_detected - /* errout: */ #define Error_Msg_N errout__error_msg_n |