X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=includes%2Frts%2Fstorage%2FTSO.h;h=e8d97c5ce0a53402ab16ddd33f2ea375574922e0;hp=b00f5d416ff5f5b6a465fb52ddb04dcefd201acb;hb=7effbbbbdfe7eb05c6402fa9337e358e7e9fadde;hpb=c5cafbcca54c4b1117bc43b31d86afa583fb7f62

diff --git a/includes/rts/storage/TSO.h b/includes/rts/storage/TSO.h
index b00f5d4..e8d97c5 100644
--- a/includes/rts/storage/TSO.h
+++ b/includes/rts/storage/TSO.h
@@ -114,7 +114,7 @@ typedef struct StgTSO_ {
     StgTSOBlockInfo         block_info;
     StgThreadID             id;
     int                     saved_errno;
-    struct Task_*           bound;
+    struct InCall_*         bound;
     struct Capability_*     cap;
     struct StgTRecHeader_ * trec;       /* STM transaction record */