aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock/Exception.hs
diff options
context:
space:
mode:
authorDavid Waern <david.waern@gmail.com>2009-06-24 21:07:50 +0000
committerDavid Waern <david.waern@gmail.com>2009-06-24 21:07:50 +0000
commitd02190da47dfd3712ce72cac6b36604f544dfb2b (patch)
treea5c0e1c5073802eef4e0fed7d5066289b0627574 /src/Haddock/Exception.hs
parent1dc4c4b1cdaf8756968f47dee1e544029da362e0 (diff)
Delete Haddock.Exception and move contents to Haddock.Types
Only a few lines of code that mainly declares a type - why not just put it in Haddock.Types.
Diffstat (limited to 'src/Haddock/Exception.hs')
-rw-r--r--src/Haddock/Exception.hs34
1 files changed, 0 insertions, 34 deletions
diff --git a/src/Haddock/Exception.hs b/src/Haddock/Exception.hs
deleted file mode 100644
index eabc722e..00000000
--- a/src/Haddock/Exception.hs
+++ /dev/null
@@ -1,34 +0,0 @@
---
--- Haddock - A Haskell Documentation Tool
---
--- (c) Simon Marlow 2003
---
-
-
-{-# LANGUAGE DeriveDataTypeable #-}
-
-
-module Haddock.Exception (
- HaddockException,
- throwE
-) where
-
-
-import Data.Typeable
-import Control.Exception
-
-
-data HaddockException = HaddockException String deriving Typeable
-
-
-instance Show HaddockException where
- show (HaddockException str) = str
-
-
-throwE :: String -> a
-#if __GLASGOW_HASKELL__ >= 609
-instance Exception HaddockException
-throwE str = throw (HaddockException str)
-#else
-throwE str = throwDyn (HaddockException str)
-#endif