summaryrefslogtreecommitdiff
path: root/rts
diff options
context:
space:
mode:
Diffstat (limited to 'rts')
-rw-r--r--rts/Exception.cmm2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Exception.cmm b/rts/Exception.cmm
index 2a07eaa6f3..a27227d547 100644
--- a/rts/Exception.cmm
+++ b/rts/Exception.cmm
@@ -456,7 +456,7 @@ stg_raisezh /* explicit stack */
/* ToDo: currently this is a hack. Would be much better if
* the info was only displayed for an *uncaught* exception.
*/
- if (RtsFlags_ProfFlags_showCCSOnException(RtsFlags) != 0::I32) {
+ if (RtsFlags_ProfFlags_showCCSOnException(RtsFlags) != 0::CBool) {
SAVE_THREAD_STATE();
ccall fprintCCS_stderr(CCCS "ptr",
exception "ptr",