X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FClosures.h;h=eb5d1ed89dea09d9782e69726d2fdaa482dbf604;hb=2da67673279cf015ccc84270f6fd7935f64261a6;hp=ef5fa4e8079d63254f4ff54934bd57bc5b264d99;hpb=dd56e9ab4544e83d27532a8d9058140bfe81825c;p=ghc-hetmet.git

diff --git a/includes/Closures.h b/includes/Closures.h
index ef5fa4e..eb5d1ed 100644
--- a/includes/Closures.h
+++ b/includes/Closures.h
@@ -398,6 +398,7 @@ typedef struct {
   StgHeader   header;
   StgClosure *code;
   StgTVarWatchQueue *next_invariant_to_check;
+  StgClosure *result;
 } StgAtomicallyFrame;
 
 typedef struct {