[commit: ghc] master: rts: detabify/dewhitespace RtsUtils.c (646f214)
git at git.haskell.org
git at git.haskell.org
Wed Aug 20 17:32:29 UTC 2014
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/646f214ab3420372b2584741e98c3dc8fe350694/ghc
>---------------------------------------------------------------
commit 646f214ab3420372b2584741e98c3dc8fe350694
Author: Austin Seipp <austin at well-typed.com>
Date: Wed Aug 20 12:28:01 2014 -0500
rts: detabify/dewhitespace RtsUtils.c
Signed-off-by: Austin Seipp <austin at well-typed.com>
>---------------------------------------------------------------
646f214ab3420372b2584741e98c3dc8fe350694
rts/RtsUtils.c | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/rts/RtsUtils.c b/rts/RtsUtils.c
index 811dcf1..aff82af 100644
--- a/rts/RtsUtils.c
+++ b/rts/RtsUtils.c
@@ -147,14 +147,14 @@ time_str(void)
static char nowstr[26];
if (now == 0) {
- time(&now);
+ time(&now);
#if HAVE_CTIME_R
- ctime_r(&now, nowstr);
+ ctime_r(&now, nowstr);
#else
- strcpy(nowstr, ctime(&now));
+ strcpy(nowstr, ctime(&now));
#endif
- memmove(nowstr+16,nowstr+19,7);
- nowstr[21] = '\0'; // removes the \n
+ memmove(nowstr+16,nowstr+19,7);
+ nowstr[21] = '\0'; // removes the \n
}
return nowstr;
}
More information about the ghc-commits
mailing list