[commit: ghc] master: use a nat, not StgWord8, for gc_type (cb7785f)

[git at git.haskell.org]

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

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

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

commit cb7785f6c1c4cb582ec9aa8ec01255f1788571d7
Author: Simon Marlow <marlowsd at gmail.com>
Date:   Tue Sep 17 21:48:55 2013 +0100

    use a nat, not StgWord8, for gc_type


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

cb7785f6c1c4cb582ec9aa8ec01255f1788571d7
 rts/Schedule.c |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rts/Schedule.c b/rts/Schedule.c
index 07ebec6..7c4e67d 100644
--- a/rts/Schedule.c
+++ b/rts/Schedule.c
@@ -1438,7 +1438,7 @@ scheduleDoGC (Capability **pcap, Task *task USED_IF_THREADS,
     rtsBool heap_census;
     nat collect_gen;
 #ifdef THREADED_RTS
-    StgWord8 gc_type;
+    nat gc_type;
     nat i, sync;
     StgTSO *tso;
 #endif