X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=includes%2FTSO.h;h=3f7923d5daf50038832c572a3e699c149bc650a3;hp=4621d4ad69f1473f913cc8af67956d9b4ef8e032;hb=c76c69c5b62f1ca4fa52d75b0dfbd37b7eddbb09;hpb=73566e25d75588185b0581722406da5c48965c51

diff --git a/includes/TSO.h b/includes/TSO.h
index 4621d4a..3f7923d 100644
--- a/includes/TSO.h
+++ b/includes/TSO.h
@@ -215,16 +215,6 @@ typedef struct StgTSO_ {
       (tso->sp is left pointing at the top word on the stack so that
       the return value or exception will be retained by a GC).
 
-   tso->blocked_exceptions is either:
-
-      NULL             if async exceptions are unblocked.
-
-      END_TSO_QUEUE    if async exceptions are blocked, but no threads
-                       are currently waiting to deliver.
-
-      (StgTSO *)tso    if threads are currently awaiting delivery of
-                       exceptions to this thread.
-
    The 2 cases BlockedOnGA and BlockedOnGA_NoSend are needed in a GUM
    setup only. They mark a TSO that has entered a FETCH_ME or
    FETCH_ME_BQ closure, respectively; only the first TSO hitting the