X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FUpdates.cmm;h=4043da05a555ca246abcf5b144f73ec64ac82778;hp=7ebade0aea309eb77e1eaabaf01056ef0589c829;hb=176fa33f17dd78355cc572e006d2ab26898e2c69;hpb=e06951a75a1f519e8f015880c363a8dedc08ff9c

diff --git a/rts/Updates.cmm b/rts/Updates.cmm
index 7ebade0..4043da0 100644
--- a/rts/Updates.cmm
+++ b/rts/Updates.cmm
@@ -45,9 +45,9 @@
 	}
 
 #if defined(PROFILING)
-#define UPD_FRAME_PARAMS W_ unused1, W_ unused2, "ptr" W_ unused3
+#define UPD_FRAME_PARAMS W_ unused1, W_ unused2, P_ unused3
 #else
-#define UPD_FRAME_PARAMS "ptr" W_ unused1
+#define UPD_FRAME_PARAMS P_ unused1
 #endif
 
 /* this bitmap indicates that the first word of an update frame is a