diff options
| author | Ian Lynagh <igloo@earth.li> | 2010-03-13 15:45:55 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2010-03-13 15:45:55 +0000 |
| commit | 929d166932ee207871e66cc305059f356241c06b (patch) | |
| tree | a8eec6032460dafe24abfdaa233b56c6bbf26cd5 /rts/hooks | |
| parent | 1e31c2960f7a9fc61119237d8a35b0516d6accca (diff) | |
| download | haskell-929d166932ee207871e66cc305059f356241c06b.tar.gz | |
Add a link-time flag to en/disable the RTS options
If RTS options are disabled then:
* The ghc_rts_opts C code variable is processed as normal
* The GHCRTS environment variable is ignored and, if it is defined, a
warning is emitted
* The +RTS flag gives an error and terminates the program
Diffstat (limited to 'rts/hooks')
| -rw-r--r-- | rts/hooks/RtsOptsEnabled.c | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/rts/hooks/RtsOptsEnabled.c b/rts/hooks/RtsOptsEnabled.c new file mode 100644 index 0000000000..d7d6cb595f --- /dev/null +++ b/rts/hooks/RtsOptsEnabled.c @@ -0,0 +1,13 @@ +/* ----------------------------------------------------------------------------- + * + * (c) The GHC Team 2010 + * + * En/disable RTS options + * + * ---------------------------------------------------------------------------*/ + +#include "Rts.h" +#include "RtsOpts.h" + +const rtsBool rtsOptsEnabled = rtsFalse; + |