Commit 0b7c9ee4 authored by sof's avatar sof
Browse files

[project @ 2002-03-02 17:51:22 by sof]

re-introduce dataToTagzh macro (unreg builds only)
parent bb22180b
/* -----------------------------------------------------------------------------
* $Id: PrimOps.h,v 1.90 2001/12/18 15:23:16 sewardj Exp $
* $Id: PrimOps.h,v 1.91 2002/03/02 17:51:22 sof Exp $
*
* (c) The GHC Team, 1998-2000
*
......@@ -341,6 +341,18 @@ EXTFUN_RTS(deRefWeakzh_fast);
EXTFUN_RTS(mkForeignObjzh_fast);
/* -----------------------------------------------------------------------------
Constructor tags
-------------------------------------------------------------------------- */
/*
* This macro is only used when compiling unregisterised code (see
* AbsCUtils.dsCOpStmt for motivation & the Story).
*/
#ifndef TABLES_NEXT_TO_CODE
# define dataToTagzh(r,a) r=(GET_TAG(((StgClosure *)a)->header.info))
#endif
/* -----------------------------------------------------------------------------
BCOs and BCO linkery
-------------------------------------------------------------------------- */
......
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