Commit 3b607293 authored by Duncan Coutts's avatar Duncan Coutts
Browse files

Add a deprecated knownExtensions for better backwards compatability

As suggested by Hamish Mackenzie
parent f7a382d9
...@@ -44,6 +44,7 @@ module Language.Haskell.Extension ( ...@@ -44,6 +44,7 @@ module Language.Haskell.Extension (
Extension(..), Extension(..),
KnownExtension(..), KnownExtension(..),
knownExtensions,
deprecatedExtensions deprecatedExtensions
) where ) where
...@@ -435,7 +436,12 @@ data KnownExtension = ...@@ -435,7 +436,12 @@ data KnownExtension =
-- | Enable non-decreasing indentation for 'do' blocks. -- | Enable non-decreasing indentation for 'do' blocks.
| NondecreasingIndentation | NondecreasingIndentation
deriving (Show, Read, Eq, Enum) deriving (Show, Read, Eq, Enum, Bounded)
{-# DEPRECATED knownExtensions
"KnownExtension is an instance of Enum and Bounded, use those instead." #-}
knownExtensions :: [KnownExtension]
knownExtensions = [minBound..maxBound]
-- | Extensions that have been deprecated, possibly paired with another -- | Extensions that have been deprecated, possibly paired with another
-- extension that replaces it. -- extension that replaces it.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment