[commit: ghc] master: rts: detabify/dewhitespace RtsStartup.c (00878c5)
git at git.haskell.org
git at git.haskell.org
Wed Aug 20 17:32:27 UTC 2014
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/00878c53dd3a15f7903872b963c8c80cb030f792/ghc
>---------------------------------------------------------------
commit 00878c53dd3a15f7903872b963c8c80cb030f792
Author: Austin Seipp <austin at well-typed.com>
Date: Wed Aug 20 12:27:39 2014 -0500
rts: detabify/dewhitespace RtsStartup.c
Signed-off-by: Austin Seipp <austin at well-typed.com>
>---------------------------------------------------------------
00878c53dd3a15f7903872b963c8c80cb030f792
rts/RtsStartup.c | 16 ++++++++--------
1 file changed, 8 insertions(+), 8 deletions(-)
diff --git a/rts/RtsStartup.c b/rts/RtsStartup.c
index 36ac269..9a3925f 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 */
More information about the ghc-commits
mailing list