diff options
author | Edward Z. Yang <ezyang@mit.edu> | 2013-09-13 22:11:12 -0700 |
---|---|---|
committer | Edward Z. Yang <ezyang@mit.edu> | 2013-09-15 23:53:10 -0700 |
commit | ea8317406e32ee8b91896439fe0810f3601d61ca (patch) | |
tree | 85e4af1181246262fcc7417e19fb8cfa35bc989c /includes/RtsAPI.h | |
parent | 769bfc7332a89e8f022e3c1b9f5ba3a2a13f88c6 (diff) | |
download | haskell-ea8317406e32ee8b91896439fe0810f3601d61ca.tar.gz |
Distinguish between hs-main cases when giving rtsopts advice.
Signed-off-by: Edward Z. Yang <ezyang@mit.edu>
Diffstat (limited to 'includes/RtsAPI.h')
-rw-r--r-- | includes/RtsAPI.h | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/includes/RtsAPI.h b/includes/RtsAPI.h index ca87662eb4..018b5813ce 100644 --- a/includes/RtsAPI.h +++ b/includes/RtsAPI.h @@ -62,6 +62,7 @@ typedef enum { typedef struct { RtsOptsEnabledEnum rts_opts_enabled; const char *rts_opts; + HsBool rts_hs_main; } RtsConfig; // Clients should start with defaultRtsConfig and then customise it. @@ -80,6 +81,10 @@ extern void startupHaskell ( int argc, char *argv[], /* DEPRECATED, use hs_exit() instead */ extern void shutdownHaskell ( void ); +/* Like hs_init(), but allows rtsopts. For more complicated usage, + * use hs_init_ghc. */ +extern void hs_init_with_rtsopts (int *argc, char **argv[]); + /* * GHC-specific version of hs_init() that allows specifying whether * +RTS ... -RTS options are allowed or not (default: only "safe" |