summaryrefslogtreecommitdiff
path: root/rts/RtsStartup.c
diff options
context:
space:
mode:
authorAustin Seipp <austin@well-typed.com>2014-08-20 12:27:39 -0500
committerAustin Seipp <austin@well-typed.com>2014-08-20 12:27:39 -0500
commit00878c53dd3a15f7903872b963c8c80cb030f792 (patch)
treeff209aa543a7812fef4105d0552c55ce21e81cc3 /rts/RtsStartup.c
parentb9ee7e8af95e7eda306b5bbff7370c8e1438c1e4 (diff)
downloadhaskell-00878c53dd3a15f7903872b963c8c80cb030f792.tar.gz
rts: detabify/dewhitespace RtsStartup.c
Signed-off-by: Austin Seipp <austin@well-typed.com>
Diffstat (limited to 'rts/RtsStartup.c')
-rw-r--r--rts/RtsStartup.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/rts/RtsStartup.c b/rts/RtsStartup.c
index 36ac26928d..9a3925fad8 100644
--- a/rts/RtsStartup.c
+++ b/rts/RtsStartup.c
@@ -26,7 +26,7 @@
#include "Weak.h"
#include "Ticky.h"
#include "StgRun.h"
-#include "Prelude.h" /* fixupRTStoPreludeRefs */
+#include "Prelude.h" /* fixupRTStoPreludeRefs */
#include "ThreadLabels.h"
#include "sm/BlockAlloc.h"
#include "Trace.h"
@@ -36,7 +36,7 @@
#include "Timer.h"
#include "Globals.h"
#include "FileLock.h"
-void exitLinker( void ); // there is no Linker.h file to include
+void exitLinker( void ); // there is no Linker.h file to include
#if defined(PROFILING)
# include "ProfHeap.h"
@@ -124,8 +124,8 @@ hs_init_ghc(int *argc, char **argv[], RtsConfig rts_config)
{
hs_init_count++;
if (hs_init_count > 1) {
- // second and subsequent inits are ignored
- return;
+ // second and subsequent inits are ignored
+ return;
}
setlocale(LC_CTYPE,"");
@@ -308,13 +308,13 @@ hs_exit_(rtsBool wait_foreign)
nat g, i;
if (hs_init_count <= 0) {
- errorBelch("warning: too many hs_exit()s");
- return;
+ errorBelch("warning: too many hs_exit()s");
+ return;
}
hs_init_count--;
if (hs_init_count > 0) {
- // ignore until it's the last one
- return;
+ // ignore until it's the last one
+ return;
}
/* start timing the shutdown */