summaryrefslogtreecommitdiff
path: root/testsuite/tests/th/T10820.hs
blob: d981afd00a243a0ac737bb74b589f144a3740879 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
{-# LANGUAGE Haskell2010 #-}
{-# 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)