diff options
Diffstat (limited to 'utils/check-exact/Preprocess.hs')
| -rw-r--r-- | utils/check-exact/Preprocess.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/check-exact/Preprocess.hs b/utils/check-exact/Preprocess.hs index 761029adb2..904e76938e 100644 --- a/utils/check-exact/Preprocess.hs +++ b/utils/check-exact/Preprocess.hs @@ -277,7 +277,7 @@ parseError pst = do let -- (warns,errs) = GHC.getMessages pst dflags -- throw $ GHC.mkSrcErr (GHC.unitBag $ GHC.mkPlainErrMsg dflags sspan err) - GHC.throwErrors (fmap GHC.pprError (GHC.getErrorMessages pst)) + GHC.throwErrors (fmap GHC.mkParserErr (GHC.getErrorMessages pst)) -- --------------------------------------------------------------------- |