diff options
Diffstat (limited to 'libraries/base/GHC/Char.hs')
| -rw-r--r-- | libraries/base/GHC/Char.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/base/GHC/Char.hs b/libraries/base/GHC/Char.hs index 4928f21e96..c2f4ec4fe5 100644 --- a/libraries/base/GHC/Char.hs +++ b/libraries/base/GHC/Char.hs @@ -11,5 +11,5 @@ chr :: Int -> Char chr i@(I# i#) | isTrue# (int2Word# i# `leWord#` 0x10FFFF##) = C# (chr# i#) | otherwise - = error ("Prelude.chr: bad argument: " ++ showSignedInt (I# 9#) i "") + = errorWithoutStackTrace ("Prelude.chr: bad argument: " ++ showSignedInt (I# 9#) i "") |