blob: 0e53bbde722138ff1f0791f33a4333813468b331 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
{-# LANGUAGE LiberalTypeSynonyms #-}
{-# LANGUAGE RankNTypes #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE MagicHash #-}
module Main where
import Language.Haskell.TH.Syntax
import GHC.LanguageExtensions
main = do
print $(isExtEnabled Cpp >>= lift)
print $(isExtEnabled LiberalTypeSynonyms >>= lift)
print $(isExtEnabled RankNTypes >>= lift)
print $(isExtEnabled TypeSynonymInstances >>= lift)
print $(isExtEnabled MagicHash >>= lift)
|
