summaryrefslogtreecommitdiff
path: root/rts/RtsFlags.h
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2011-04-12 13:21:41 +0100
committerSimon Marlow <marlowsd@gmail.com>2011-04-12 14:21:37 +0100
commit5463b55b7dadc1e9918edb2d8666bf3ed195bc61 (patch)
tree9738714d517d56166a90a6eb18decb34fcf9d406 /rts/RtsFlags.h
parent4f018b471c7c5db858beb508b8430ae4d0621173 (diff)
downloadhaskell-5463b55b7dadc1e9918edb2d8666bf3ed195bc61.tar.gz
Cleanup sweep and fix a bug in RTS flag processing.
This code has accumulated a great deal of cruft over the years, this pass cleans up a lot of the surrounding cruft but leaves the actual argument processing alone - so there's still more that could be done. Bug fixed: - ghc_rts_opts should not be subject to the --rtsopts setting. If the programmer explicitly declares options with ghc_rts_opts, they shouldn't also have to accept command-line RTS options to make them work.
Diffstat (limited to 'rts/RtsFlags.h')
-rw-r--r--rts/RtsFlags.h23
1 files changed, 23 insertions, 0 deletions
diff --git a/rts/RtsFlags.h b/rts/RtsFlags.h
new file mode 100644
index 0000000000..3ebfef6447
--- /dev/null
+++ b/rts/RtsFlags.h
@@ -0,0 +1,23 @@
+/* -----------------------------------------------------------------------------
+ *
+ * (c) The AQUA Project, Glasgow University, 1994-1997
+ * (c) The GHC Team, 1998-2006
+ *
+ * Functions for parsing the argument list.
+ *
+ * ---------------------------------------------------------------------------*/
+
+#ifndef RTSFLAGS_H
+#define RTSFLAGS_H
+
+#include "BeginPrivate.h"
+
+/* Routines that operate-on/to-do-with RTS flags: */
+
+void initRtsFlagsDefaults (void);
+void setupRtsFlags (int *argc, char *argv[]);
+void setProgName (char *argv[]);
+
+#include "EndPrivate.h"
+
+#endif /* RTSFLAGS_H */