|
1 | 1 | ------------------------------------------------------------------------------ |
2 | 2 | -- G N A T C O L L -- |
3 | 3 | -- -- |
4 | | --- Copyright (C) 2005-2019, AdaCore -- |
| 4 | +-- Copyright (C) 2005-2022, AdaCore -- |
5 | 5 | -- -- |
6 | 6 | -- This library is free software; you can redistribute it and/or modify it -- |
7 | 7 | -- under terms of the GNU General Public License as published by the Free -- |
@@ -141,7 +141,8 @@ package GNATCOLL.Memory is |
141 | 141 | -- traces that are output to indicate locations of actions for error |
142 | 142 | -- conditions such as bad allocations. If set to zero, the debug pool |
143 | 143 | -- will not try to compute backtraces. This is more efficient but gives |
144 | | - -- less information on problem locations |
| 144 | + -- less information on problem locations (and in particular, this |
| 145 | + -- disables the tracking of the biggest users of memory). |
145 | 146 | -- |
146 | 147 | -- Maximum_Logically_Freed_Memory: maximum amount of memory (bytes) |
147 | 148 | -- that should be kept before starting to physically deallocate some. |
@@ -199,8 +200,12 @@ package GNATCOLL.Memory is |
199 | 200 |
|
200 | 201 | procedure Dump (Size : Positive; Report : Report_Type := All_Reports); |
201 | 202 | -- Dump information about memory usage. |
202 | | - -- Size is the number of the biggest memory users we want to show. Report |
203 | | - -- indicates which sorting order is used in the report |
| 203 | + -- Size is the number of the biggest memory users we want to show |
| 204 | + -- (requires that the Debug_Pool has been configured with Stack_Trace_Depth |
| 205 | + -- greater than zero). Also, for efficiency reasons, tracebacks with |
| 206 | + -- a memory allocation below 1_000 bytes are not shown in the "biggest |
| 207 | + -- memory users" part of the report. |
| 208 | + -- Report indicates which sorting order is used in the report. |
204 | 209 |
|
205 | 210 | procedure Reset; |
206 | 211 | -- Reset all internal data. This is in general not needed, unless you want |
|
0 commit comments