blob: a1886ba2889f1e1e4bebec14cc8193f58667e752 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
--
-- 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
throwE str = throwDyn (HaddockException str)
instance Show HaddockException where
show (HaddockException str) = str
|
