Prune is not regarded for DEPRECATED things

[SimonHengel]

(only the current ghc-7.4 branch is affected)

Steps to reproduce:

{-# OPTIONS_HADDOCK prune #-}
module PruneWithWarning (foo, bar) where

foo :: Int
foo = 23
{-# DEPRECATED foo "use bar instead" #-}

bar :: Int
bar = 42

$ haddock -h PruneWithWarning.hs

Expected result: The generated documentation contains nothing.

Actual result: The generated documentation contains foo, together with a deprecation message.

[anonymous]

Milestone 2.10.0 deleted