Commit ab3e053a authored by simonm's avatar simonm

[project @ 1999-02-15 12:12:55 by simonm]

Add a few more flag test macros.
parent 94478a50
/* ----------------------------------------------------------------------------
* $Id: InfoTables.h,v 1.10 1999/02/05 16:02:23 simonm Exp $
* $Id: InfoTables.h,v 1.11 1999/02/15 12:12:55 simonm Exp $
*
* (c) The GHC Team, 1998-1999
*
......@@ -179,8 +179,12 @@ typedef enum {
#define _UPT (1<<6) /* unpointed? */
#define _SRT (1<<7) /* has an SRT? */
#define isSTATIC(flags) ((flags)&_STA)
#define isMUTABLE(flags) ((flags) &_MUT)
#define isSTATIC(flags) ((flags) &_STA)
#define isMUTABLE(flags) ((flags) &_MUT)
#define isBITMAP(flags) ((flags) &_BTM)
#define isTHUNK(flags) ((flags) &_THU)
#define isUNPOINTED(flags) ((flags) &_UPT)
#define hasSRT(flags) ((flags) &_SRT)
#define closure_STATIC(closure) ( get_itbl(closure)->flags & _STA)
#define closure_SHOULD_SPARK(closure) (!(get_itbl(closure)->flags & _NS))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment