blob: 2f8fb49224199927913b0ae0bf6f6856986c6a94 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
|
-- |
-- What is tested here:
--
-- * If parsing of a deprecation message fails, the message is included
-- verbatim.
--
module DeprecationMessageParseError where
-- | some documentation for foo
foo :: Int
foo = 23
{-# DEPRECATED foo "use @bar instead" #-}
|