{-# LANGUAGE CPP #-}
#include "ghclib_api.h"
module Language.Haskell.GhclibParserEx.GHC.Hs.Decls(
isNewType, isForD, isDerivD, isClsDefSig
) where
#if defined (GHCLIB_API_811) || defined (GHCLIB_API_810)
import GHC.Hs
#else
import HsSyn
#endif
import SrcLoc
isNewType :: NewOrData -> Bool
isNewType :: NewOrData -> Bool
isNewType NewType = Bool
True
isNewType DataType = Bool
False
isForD, isDerivD :: LHsDecl GhcPs -> Bool
isForD :: LHsDecl GhcPs -> Bool
isForD (L _ ForD{}) = Bool
True; isForD _ = Bool
False
isDerivD :: LHsDecl GhcPs -> Bool
isDerivD (L _ DerivD{}) = Bool
True; isDerivD _ = Bool
False
isClsDefSig :: Sig GhcPs -> Bool
isClsDefSig :: Sig GhcPs -> Bool
isClsDefSig (ClassOpSig _ True _ _) = Bool
True; isClsDefSig _ = Bool
False