{-# OPTIONS -Wno-orphans #-}
module Language.Haskell.Exts.Util
( -- * Free variables of ASTs
FreeVars(..)
, Vars(..)
, AllVars(..)
-- * Rebracketing of ASTs
, Brackets(..)
, paren
, transformBracket
, rebracket1
, appsBracket
) where
import Data.Default
import Language.Haskell.Exts hiding (paren)
import Language.Haskell.Exts.Bracket
import Language.Haskell.Exts.FreeVars
-- Orphan instances required for using the bracketing code with HSE source locs
instance Default SrcLoc where
def = noLoc
instance Default SrcSpan where
def = srcInfoSpan noSrcSpan
instance Default SrcSpanInfo where
def = noSrcSpan