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)14MallocFailHook (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