1 /* -----------------------------------------------------------------------------
2  *
3  * User-overridable RTS hooks.
4  *
5  * ---------------------------------------------------------------------------*/
6 
7 #include "PosixSource.h"
8 #include "Rts.h"
9 #include "Hooks.h"
10 
11 #include <stdio.h>
12 
13 void
MallocFailHook(W_ request_size,const char * msg)14 MallocFailHook (W_ request_size /* in bytes */, const char *msg)
15 {
16     fprintf(stderr, "malloc: failed on request for %" FMT_Word " bytes; message: %s\n", request_size, msg);
17 }
18 
19