diff options
Diffstat (limited to 'libraries/base/System/IO.hs')
| -rw-r--r-- | libraries/base/System/IO.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/base/System/IO.hs b/libraries/base/System/IO.hs index e0ee9b15be..04e976a85b 100644 --- a/libraries/base/System/IO.hs +++ b/libraries/base/System/IO.hs @@ -480,7 +480,7 @@ openTempFile' loc tmp_dir template binary mode = findTempName -- Otherwise, something is wrong, because (break (== '.')) should -- always return a pair with either the empty string or a string -- beginning with '.' as the second component. - _ -> error "bug in System.IO.openTempFile" + _ -> errorWithoutStackTrace "bug in System.IO.openTempFile" findTempName = do rs <- rand_string |