Commit f7bb70d9 authored by Simon Marlow's avatar Simon Marlow
Browse files

bugfix for LDV profiling on 64-bit platforms

There was an integer overflow in the definition of LDV_RECORD_CREATE
when StgWord is 64 bits.
parent 679557b0
...@@ -25,7 +25,7 @@ ...@@ -25,7 +25,7 @@
*/ */
#ifndef CMINUSMINUS #ifndef CMINUSMINUS
#define LDV_RECORD_CREATE(c) \ #define LDV_RECORD_CREATE(c) \
LDVW((c)) = (RTS_DEREF(era) << LDV_SHIFT) | LDV_STATE_CREATE LDVW((c)) = ((StgWord)RTS_DEREF(era) << LDV_SHIFT) | LDV_STATE_CREATE
#endif #endif
#ifdef CMINUSMINUS #ifdef CMINUSMINUS
......
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