X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FClosureTypes.h;h=e1a9f2c591c1021afbc9c08f7d5637997d7471fa;hb=3ddfe34ba0b8b1c0721841c73d0c671e43a600ac;hp=e53c3fec755e96d9c0166da87e79cbdb639695c2;hpb=030a1217712fb01f9feeee436efd6c0523aa3b43;p=ghc-hetmet.git diff --git a/ghc/includes/ClosureTypes.h b/ghc/includes/ClosureTypes.h index e53c3fe..e1a9f2c 100644 --- a/ghc/includes/ClosureTypes.h +++ b/ghc/includes/ClosureTypes.h @@ -1,5 +1,5 @@ /* ---------------------------------------------------------------------------- - * $Id: ClosureTypes.h,v 1.10 1999/03/15 16:30:24 simonm Exp $ + * $Id: ClosureTypes.h,v 1.12 2000/01/13 14:34:00 hwloidl Exp $ * * (c) The GHC Team, 1998-1999 * @@ -62,18 +62,25 @@ #define SEQ_FRAME 46 #define BLACKHOLE 47 #define BLACKHOLE_BQ 48 -#define MVAR 49 -#define ARR_WORDS 50 -#define MUT_ARR_PTRS 51 -#define MUT_ARR_PTRS_FROZEN 52 -#define MUT_VAR 53 -#define WEAK 54 -#define FOREIGN 55 -#define STABLE_NAME 56 -#define TSO 57 -#define BLOCKED_FETCH 58 -#define FETCH_ME 59 -#define EVACUATED 60 -#define N_CLOSURE_TYPES 61 +#define SE_BLACKHOLE 49 +#define SE_CAF_BLACKHOLE 50 +#define MVAR 51 +#define ARR_WORDS 52 +#define MUT_ARR_PTRS 53 +#define MUT_ARR_PTRS_FROZEN 54 +#define MUT_VAR 55 +#define WEAK 56 +#define FOREIGN 57 +#define STABLE_NAME 58 + +#define TSO 59 +#define BLOCKED_FETCH 60 +#define FETCH_ME 61 +#define FETCH_ME_BQ 62 +#define RBH 63 + +#define EVACUATED 64 + +#define N_CLOSURE_TYPES 65 #endif CLOSURETYPES_H