aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Waern <davve@dtek.chalmers.se>2008-01-05 14:33:45 +0000
committerDavid Waern <davve@dtek.chalmers.se>2008-01-05 14:33:45 +0000
commit36c2624b87e9fd6fc77d0f9cbb02d453a1ad3590 (patch)
treed293b165a77c86aa82eeb3f040416e27a4ea2e64
parenta9942364d880e6fd5b83ff38bce74680df04c652 (diff)
Add DrIFT commands
-rw-r--r--src/Haddock/Types.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Haddock/Types.hs b/src/Haddock/Types.hs
index f1e01459..0efffafb 100644
--- a/src/Haddock/Types.hs
+++ b/src/Haddock/Types.hs
@@ -14,7 +14,7 @@ import qualified Data.Map as Map
import GHC hiding (NoLink)
import Outputable
-
+{-! for DocOption derive: Binary !-}
data DocOption
= OptHide -- ^ This module should not appear in the docs
| OptPrune
@@ -80,6 +80,7 @@ type DocMap = Map Name (HsDoc DocName)
type LinkEnv = Map Name Name
+{-! for DocName derive: Binary !-}
data DocName = Link Name | NoLink Name