[commit: ghc] master: [ci skip] includes: detabify/dewhitespace rts/storage/InfoTables.h (98b1b13)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/98b1b13f6894a55e0278fad9379fe74614774577/ghc

>---------------------------------------------------------------

commit 98b1b13f6894a55e0278fad9379fe74614774577
Author: Austin Seipp <austin at well-typed.com>
Date:   Wed Aug 20 12:49:33 2014 -0500

    [ci skip] includes: detabify/dewhitespace rts/storage/InfoTables.h
    
    Signed-off-by: Austin Seipp <austin at well-typed.com>


>---------------------------------------------------------------

98b1b13f6894a55e0278fad9379fe74614774577
 includes/rts/storage/InfoTables.h | 52 +++++++++++++++++++--------------------
 1 file changed, 26 insertions(+), 26 deletions(-)

diff --git a/includes/rts/storage/InfoTables.h b/includes/rts/storage/InfoTables.h
index 3fbeed2..3890d49 100644
--- a/includes/rts/storage/InfoTables.h
+++ b/includes/rts/storage/InfoTables.h
@@ -61,7 +61,7 @@ typedef struct {
 #ifdef DEBUG_CLOSURE
 
 typedef struct {
-	... whatever ...
+        ... whatever ...
 } StgDebugInfo;
 
 #else /* !DEBUG_CLOSURE */
@@ -112,14 +112,14 @@ extern StgWord16 closure_flags[];
 #define ipFlags(ip)             (closure_flags[ip->type])
 
 #define ip_HNF(ip)               (  ipFlags(ip) & _HNF)
-#define ip_BITMAP(ip)       	 (  ipFlags(ip) & _BTM)
-#define ip_SHOULD_SPARK(ip) 	 (!(ipFlags(ip) & _NS))
-#define ip_STATIC(ip)       	 (  ipFlags(ip) & _STA)
-#define ip_THUNK(ip)        	 (  ipFlags(ip) & _THU)
-#define ip_MUTABLE(ip)      	 (  ipFlags(ip) & _MUT)
-#define ip_UNPOINTED(ip)    	 (  ipFlags(ip) & _UPT)
-#define ip_SRT(ip)          	 (  ipFlags(ip) & _SRT)
-#define ip_IND(ip)          	 (  ipFlags(ip) & _IND)
+#define ip_BITMAP(ip)            (  ipFlags(ip) & _BTM)
+#define ip_SHOULD_SPARK(ip)      (!(ipFlags(ip) & _NS))
+#define ip_STATIC(ip)            (  ipFlags(ip) & _STA)
+#define ip_THUNK(ip)             (  ipFlags(ip) & _THU)
+#define ip_MUTABLE(ip)           (  ipFlags(ip) & _MUT)
+#define ip_UNPOINTED(ip)         (  ipFlags(ip) & _UPT)
+#define ip_SRT(ip)               (  ipFlags(ip) & _SRT)
+#define ip_IND(ip)               (  ipFlags(ip) & _IND)
 
 /* -----------------------------------------------------------------------------
    Bitmaps
@@ -185,13 +185,13 @@ typedef struct StgLargeSRT_ {
  * word long.
  */
 typedef union {
-    struct {			/* Heap closure payload layout: */
-	StgHalfWord ptrs;	/* number of pointers */
-	StgHalfWord nptrs;	/* number of non-pointers */
+    struct {                    /* Heap closure payload layout: */
+        StgHalfWord ptrs;       /* number of pointers */
+        StgHalfWord nptrs;      /* number of non-pointers */
     } payload;
 
-    StgWord bitmap;		  /* word-sized bit pattern describing */
-				  /*  a stack frame: see below */
+    StgWord bitmap;               /* word-sized bit pattern describing */
+                                  /*  a stack frame: see below */
 
 #ifndef TABLES_NEXT_TO_CODE
     StgLargeBitmap* large_bitmap; /* pointer to large bitmap structure */
@@ -199,7 +199,7 @@ typedef union {
     OFFSET_FIELD(large_bitmap_offset);  /* offset from info table to large bitmap structure */
 #endif
 
-    StgWord selector_offset;	  /* used in THUNK_SELECTORs */
+    StgWord selector_offset;      /* used in THUNK_SELECTORs */
 
 } StgClosureInfo;
 
@@ -210,7 +210,7 @@ typedef union {
 typedef struct StgInfoTable_ {
 
 #if !defined(TABLES_NEXT_TO_CODE)
-    StgFunPtr       entry;	/* pointer to the entry code */
+    StgFunPtr       entry;      /* pointer to the entry code */
 #endif
 
 #ifdef PROFILING
@@ -223,9 +223,9 @@ typedef struct StgInfoTable_ {
   /* Debug-specific stuff would go here. */
 #endif
 
-    StgClosureInfo  layout;	/* closure layout info (one word) */
+    StgClosureInfo  layout;     /* closure layout info (one word) */
 
-    StgHalfWord     type;	/* closure type */
+    StgHalfWord     type;       /* closure type */
     StgHalfWord     srt_bitmap;
        /* In a CONSTR:
             - the constructor tag
@@ -257,8 +257,8 @@ typedef struct StgInfoTable_ {
 typedef struct StgFunInfoExtraRev_ {
     OFFSET_FIELD(slow_apply_offset); /* apply to args on the stack */
     union {
-	StgWord bitmap;
-	OFFSET_FIELD(bitmap_offset);	/* arg ptr/nonptr bitmap */
+        StgWord bitmap;
+        OFFSET_FIELD(bitmap_offset);    /* arg ptr/nonptr bitmap */
     } b;
     OFFSET_FIELD(srt_offset);   /* pointer to the SRT table */
     StgHalfWord    fun_type;    /* function type */
@@ -268,9 +268,9 @@ typedef struct StgFunInfoExtraRev_ {
 typedef struct StgFunInfoExtraFwd_ {
     StgHalfWord    fun_type;    /* function type */
     StgHalfWord    arity;       /* function arity */
-    StgSRT         *srt;	/* pointer to the SRT table */
+    StgSRT         *srt;        /* pointer to the SRT table */
     union { /* union for compat. with TABLES_NEXT_TO_CODE version */
-	StgWord        bitmap;	/* arg ptr/nonptr bitmap */
+        StgWord        bitmap;  /* arg ptr/nonptr bitmap */
     } b;
     StgFun         *slow_apply; /* apply to args on the stack */
 } StgFunInfoExtraFwd;
@@ -299,11 +299,11 @@ extern StgWord stg_arg_bitmaps[];
 
 typedef struct {
 #if defined(TABLES_NEXT_TO_CODE)
-    OFFSET_FIELD(srt_offset);	/* offset to the SRT table */
+    OFFSET_FIELD(srt_offset);   /* offset to the SRT table */
     StgInfoTable i;
 #else
     StgInfoTable i;
-    StgSRT      *srt;	/* pointer to the SRT table */
+    StgSRT      *srt;   /* pointer to the SRT table */
 #endif
 } StgRetInfoTable;
 
@@ -321,9 +321,9 @@ typedef struct StgThunkInfoTable_ {
     StgInfoTable i;
 #endif
 #if defined(TABLES_NEXT_TO_CODE)
-    OFFSET_FIELD(srt_offset);	/* offset to the SRT table */
+    OFFSET_FIELD(srt_offset);   /* offset to the SRT table */
 #else
-    StgSRT         *srt;	/* pointer to the SRT table */
+    StgSRT         *srt;        /* pointer to the SRT table */
 #endif
 #if defined(TABLES_NEXT_TO_CODE)
     StgInfoTable i;