diff options
| -rw-r--r-- | src/Haddock/Types.hs | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/src/Haddock/Types.hs b/src/Haddock/Types.hs index 544c7575..44c6f4ef 100644 --- a/src/Haddock/Types.hs +++ b/src/Haddock/Types.hs @@ -360,12 +360,8 @@ instance Show HaddockException where throwE :: String -> a -#if __GLASGOW_HASKELL__ >= 609 instance Exception HaddockException throwE str = throw (HaddockException str) -#else -throwE str = throwDyn (HaddockException str) -#endif -- In "Haddock.Interface.Create", we need to gather -- @Haddock.Types.ErrMsg@s a lot, like @ErrMsgM@ does, |