diff options
| author | Ben Gamari <bgamari.foss@gmail.com> | 2016-12-01 12:25:00 -0500 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2016-12-01 12:25:00 -0500 |
| commit | 0ac5e0cb9afc9c15386f381ed41bf514ee2ffde7 (patch) | |
| tree | a118749f48262617c52b4ca46428da63443cd448 /rts/Exception.cmm | |
| parent | a452c6e57a286f3b31f0e3fbef83cbea0cee8b34 (diff) | |
| download | haskell-0ac5e0cb9afc9c15386f381ed41bf514ee2ffde7.tar.gz | |
rts: Fix type of bool literal
Test Plan: Build `p` way
Reviewers: austin, erikd, simonmar
Reviewed By: simonmar
Subscribers: thomie
Differential Revision: https://phabricator.haskell.org/D2779
Diffstat (limited to 'rts/Exception.cmm')
| -rw-r--r-- | rts/Exception.cmm | 2 |
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", |