diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2021-02-26 15:40:18 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-03-08 07:32:15 -0500 |
| commit | 33a4fd9939f8fc8e9ba4e61041270353f51ae55e (patch) | |
| tree | 8bc3624fc179d11dc68a504646bae97b1ce48dcb /includes | |
| parent | 657b5538904f7d9e0b3ea5d84f4017af3c513df9 (diff) | |
| download | haskell-33a4fd9939f8fc8e9ba4e61041270353f51ae55e.tar.gz | |
eventlog: Add MEM_RETURN event to give information about fragmentation
See #19357
The event reports the
* Current number of megablocks allocated
* The number that the RTS thinks it needs
* The number is managed to return to the OS
When current > need then the difference is returned to the OS, the
successful number of returned mblocks is reported by 'returned'.
In a fragmented heap current > need but returned < current - need.
Diffstat (limited to 'includes')
| -rw-r--r-- | includes/rts/EventLogFormat.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/includes/rts/EventLogFormat.h b/includes/rts/EventLogFormat.h index b80a9d3a94..37b7bc363d 100644 --- a/includes/rts/EventLogFormat.h +++ b/includes/rts/EventLogFormat.h @@ -127,6 +127,8 @@ * see http://www.mathematik.uni-marburg.de/~eden/ */ +#define EVENT_MEM_RETURN 90 /* (cap, current_mblocks, needed_mblocks, returned_mblocks) */ + /* Range 100 - 139 is reserved for Mercury. */ /* Range 140 - 159 is reserved for Perf events. */ |