1 \section[storage-manager-init]{Initialising the storage manager}
3 To initialise the storage manager, we pass it:
6 An @argc@/@argv@ combo, which are the command-line arguments that have
7 been deemed to belong to the runtime system. The initialisation
8 routine can slurp around in there for information of interest to
12 A filehandle to which any storage-manager statistics should be written.
17 #include "SMinternal.h"
20 \section[storage-manager-exit]{Winding up the storage manager}
24 exitSM (smInfo *sm_info)
27 /* Upon closing down the storage manager, we free all foreign objects */
28 rc = freeForeigns(sm_info->ForeignObjList);
29 /* Return code ignored for now */
30 stat_exit(sm_info->hp - hp_start);
32 return rtsTrue; /* I'm happy */