/* ----------------------------------------------------------------------------
- * $Id: StgTicky.h,v 1.13 2002/12/11 15:36:39 simonmar Exp $
+ * $Id: StgTicky.h,v 1.15 2003/07/28 15:59:09 simonmar Exp $
*
* (c) The AQUA project, Glasgow University, 1994-1997
* (c) The GHC Team, 1998-1999
TICK_SLOW_HISTO(n)
// A slow call to a FUN found insufficient arguments, and built a PAP
-#define TICK_SLOW_CALL_BUILT_PAP(n) SLOW_CALL_BUILT_PAP_ctr++
+#define TICK_SLOW_CALL_BUILT_PAP() SLOW_CALL_BUILT_PAP_ctr++
// A slow call to a PAP found insufficient arguments, and build a new PAP
-#define TICK_SLOW_CALL_NEW_PAP(n) SLOW_CALL_NEW_PAP_ctr++
+#define TICK_SLOW_CALL_NEW_PAP() SLOW_CALL_NEW_PAP_ctr++
/* -----------------------------------------------------------------------------
Returns
----------------------- --------------------------------------------
TICK_UPD_SQUEEZED Same as UPD_EXISTING but because
of stack-squeezing
+
TICK_UPD_CON_IN_NEW Allocating a new CON
TICK_UPD_CON_IN_PLACE Updating with a PAP in place
TICK_UPD_PAP_IN_NEW Allocating a new PAP
TICK_UPD_PAP_IN_PLACE Updating with a PAP in place
+ ToDo: the IN_PLACE versions are not relevant any more.
-------------------------------------------------------------------------- */
#define TICK_UPD_HISTO(categ,n) \
#define TICK_ENT_BH()
#define TICK_SLOW_CALL(n)
-#define TICK_SLOW_CALL_BUILT_PAP(n)
-#define TICK_SLOW_CALL_NEW_PAP(n)
+#define TICK_SLOW_CALL_BUILT_PAP()
+#define TICK_SLOW_CALL_NEW_PAP()
#define TICK_RET_NEW(n)
#define TICK_RET_OLD(n)