[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