[project @ 1999-01-21 20:00:55 by sof]

[ghc-hetmet.git] / ghc / includes / InfoTables.h

diff --git a/ghc/includes/InfoTables.h b/ghc/includes/InfoTables.h
index 2095026..78e754d 100644 (file)
--- a/ghc/includes/InfoTables.h
+++ b/ghc/includes/InfoTables.h
@@ -1,5 +1,5 @@
 /* ----------------------------------------------------------------------------
- * $Id: InfoTables.h,v 1.3 1999/01/13 17:25:53 simonm Exp $
+ * $Id: InfoTables.h,v 1.5 1999/01/18 15:21:42 simonm Exp $
  * 
  * Info Tables
  *
@@ -127,13 +127,16 @@ typedef enum {
     , SEQ_FRAME
 
     , BLACKHOLE
+    , BLACKHOLE_BQ
+
     , MVAR
 
     , ARR_WORDS
-
     , MUT_ARR_WORDS
+
     , MUT_ARR_PTRS
     , MUT_ARR_PTRS_FROZEN
+
     , MUT_VAR
 
     , WEAK
@@ -199,6 +202,7 @@ typedef enum {
 #define FLAGS_FOREIGN             (_HNF|     _NS|              _UPT     )      
 #define FLAGS_WEAK                (_HNF|     _NS|              _UPT     )      
 #define FLAGS_BLACKHOLE                   (          _NS|              _UPT     )      
+#define FLAGS_BLACKHOLE_BQ        (          _NS|         _MUT|_UPT     )      
 #define FLAGS_MVAR                (_HNF|     _NS|         _MUT|_UPT     )      
 #define FLAGS_FETCH_ME            (_HNF|     _NS                        )      
 #define FLAGS_TSO                  (_HNF|     _NS|         _MUT|_UPT     )